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Robofica/Aplicaciones 



Superar obstaculos 

Ha llegado el momento de que esfudiemos como conseguir que un 
robot se mueva de una manera autenticamente "inteligente" 





Construyendo una i ma gen 

Si sus procesadores son 
suficientemente sofisticados, 
Ids robots mGviles pueden 
aprender un catalog o de objetos 
arquetfpicos para utilizar con 
algorithms para reccnocimiento 
de formasycomparacitinde 
pat rones. El brazo- robot Beasty, 
que vemos en la fotografia, estd 
equipado con una camara Snap, 
que produce una imagen digital fr 
y el software Snap, que incluye 
un modulo para reconocimiento 
de objetos. Una vez que el 
objeto hasido "vfsto" desde 
distintos anguics, el brazo tiene 
una razonable posibilidad de 
reconocerlo en cualquier 
posicron 



En primer lugar, no queremos control ar al robot 
mediante un operador humano. Si cl operador 
debc observarlo y controtar hast a el mas mfnimo de 
sus movimientos, entonces en much as aplicaciones 
la utilization de un robot no tendria el menor senti- 
do: la persona bien podna Jlevar a cabo las tareas 
que realiza este. Esto, por supuesto, no es asi para 
tod as las situaciones. Los robots que se utilizan 
para desactrvar bombas son controlados por el 
hombre, porque para guiarlos correct amente aun 
sigue siendo necesaria la experiencia humana. 

Asimismo, tampoco tiene mucho sentido contro- 
lar un robot a traves de una secuencia fija de ins- 
tructions almacenadas en un ordenador. Esto re- 
sultaria ser poco mas que un automata, un disposi- 
tivo que sigue al pie de la letra la secuencia incorpo- 
rada, independientemente de las circun stand as. 
Nuevamente hay ocasiones en la que tales dispositi- 
vos son utiles: con frecuencia los brazos-robot se 
consideran ^inteligentes" aun cuando lleven a cabo 
un conjunto preprogram ado dc acciones. 

Sin embargo, hemos definido al robot "inteligen- 
te" como aquel que pueda servir una taza de caf£ 
por la manana. Este robot no podria ser controlado 
por un ser humano, dado que su funei6n consiste 
en llevar a cabo su tarea cuando aun no hay ningun 
ser humano despierto. Si este dispositivo servidor 
de cafe se program ara con una secuencia fija de 



instrucciones, surgirian problemas si se cambiara 
de lugar la cama o se dejara ropa en el suelo, 

De mo do que nuestra definicion de movimiento 
inteligente es la capacidad de un robot de despla- 
zarse por su entomo sin que lo controle ningun ser 
humano y sin seguir ciegamente ninguna secuencia 
fija de mstrucciones. Deberia ser capaz de mo verse 
de un punto a otro, evitando cualquier obstaculo. 

En el campo de la inteligencia artificial existe la 
tradition de utilizar juegos de una u otra clase para 
examinar problem as complejos de esta clase, Asf 
como los prograrnas para jugar al ajedrez han per- 
mitido profundizar considerablemente en otras 
ramas de la inteligencia artificial, los robots que co- 
rren a traves de laherintos pueden ayudarnos en 
nuestra defimeion de movimiento autenticamente 
inteligente. A fines de los anos setenta comenzaron 
en Estados Unidos las competiciones de 1 'micro rra- 
tones", y en 1980 se celebrb en Gran Bret an a la 
primera competition de esta naturaleza. La idea 
era muy sencilla; se construyo un gran laberinto de 
alrededor de tres metres cuadrados y los partici- 
p antes hubieron de disenar "ratones- robot" que 
pudieran descubrir por si mismos el cam i no hasta el 
centra sin ninguna. clase de ayuda. El laberinto se 
componia de pequenos cuadrados de igual tamano 
cuyos lados en ocasiones estaban abiertos para 
mostrar una posible ruta y otras veces cerrados 
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Solution al laberinto 

49 flEM*.~*.CBM 64 

50 REM-SOLUCION AL LABERINTO. 

51 REM CBM 64 

tQOGOSUBZOOO :REM INICIO 

1 50 G osub mm ■ r em I mpr . labsrinto 

200 FOR L-1 TO 1 

250 SOSUB7000 : REM Ml PAR ALREOEDOR 

3M GOSUB 8000 :REM MOVERSE 

400 NEXT L 

450 R=l6:CO=12;G0$UB 9500 
500 IF LAB <> HM THEN PRINT" CI EGO" 
530 IF LAB=HM THEN PRINT'CASA" 
900 PRJNT: PRINT: INPUT AS: RUN 

1999 REM 

2000 REM * INICIO 
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0:S2 = TM.TM:GX= W. 2: G Y= T M + 2 
,BfTMJM) ( RS(4) k LX(4),LY{4) 
RND(-TI) 
DEFFNR(N) ■ I NT(RND(1 )* N + 1 } 
HM= -\M= -2:WL=42:Wa=CHR*(WL) 
CL&!=CHR£{147}:H£=CHR£(1 3) 
X-GX-1:Y-GY-2:0fl-3 
DS=CHRS(17):PS=D£ 

FDR K=1 TO 5:P£=PS+P&NEXT K:PS=HS+PS 
O*WAi P 1 l -0" l -1,fl l ".MJ,-1." M.0, H " 
P3R K=1 TO 4:READ LXfK},LY(K),RS{K) 
flEXF ICRETURN 

RBM 

SEH * MIRAR ALREDEOOR 
=&l 

R=1^O=1:G0SUB9500 
_=r«=B;fOR S=1 TO 4 
tt=X-LX{S):NY=Y-r LY(S) 
fS<1 OR NX > TM THEN NEXT S:RETURN 
?V' < C3hY> TM THEN NEXT S:RETURN 
UB=UBP0(.NY):1F LAB=Q THEN ND=S 
mtm=m THEN ND=S;$-4:L=1 
VE~ £ =£-_•=,', 
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rU»-X+1:G0SUB 9500 

=4 SD = DR-2-4.fDR<,1):FL=2 


- = z l~. »=XH-LX(NDj:V=Y+LYfND1 
fS « «fc F Y>TM THEN L=1 : RETURN 
_. = =. = : ;= -LAB (X.Y) 
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W^W+fcTS-TS+W&NEXT K 

WBJ=2TQTM+1 
□ -= ST IS 




= ',V^1:C0=WX+1 




-- V rVS S'EXTK 
_^F,-tf 55-1 -FNR(TM}:GOSUB 9500 
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lTTPE"f fT|TT(fTT -1J;:RETURN 



Complem. al basic 

tntroduzea fassiguientes 
modificaciones en este 
programa: 

BBC Micro 



49 REM ■ SBC ' ' 

50 REM - 50LUCI0N AL LABERINTO 

51 REM "BBC 

9040 CLS:FI=1:C0=1 

9600 PRINT TAB(CO - 1 .Fl - 11 : : RETU RM 



Spectrum 



40 REM *« SPECTRUM 

50 REM ' SOLUCIONAL LABERINTO 

51 REM ■ SPECTRUM *' 
2120 DIM LAB(TMJM);DIM RS(4) 

2130 DIM LX(4)hDIM LY(4) 

2140 RANDOMIZE 

2150 D EFFN R (N) ^ I NT(RND- N •+• T ) 

9040 CLS:FI= 1:CO M 

9600 PRINT AT (Ft - 1 ,00 - 1 );: R ETURN 



para denotar una pared, El raton que llego al cen- 
tro en el menor tiempo gano la competition. 

En el primer certamen de microrratones celebra- 
do en Gran Bretana solo hubo cinco participantes. 
Atgunos se comportaban de una forma sumamcntc 
erratica; uno ni siquiera podia avanzar en linea 
recta y hasta el mejor de los ratones quedaba bas- 
tante confundido despues de dar la vuclta a un par 
de esquinas. En el mismo ano se celcbraron las fi- 
nales eu rope as de esta competiti6n y participaron 
ratones precedent es dc Finlandia, Suiza y Alema- 
nia. Finalmente hubo uno que consiguio recorrer el 
laberinto correct amente; se trataba del Stirling 
mouse de Nick Smith, que estaba equipado con 
sencillos sen so res mecanicos que corrian a lo largo 
de la parte superior de las paredes del laberinto y 
funcionaba con un sencillo motor paso a paso. 
Desde entonces, el interes en esta clase de competi- 
ciones ha aumentado, y en la Euromouse Contest 
que se celebro en Madrid en 1984 el mejor tiempo 
conseguido para alcanzar el centro del laberinto fue 
de 31 A segundos. Algunos participates tampoco 
entonces pudieron Ilegar a la meta, pero la mayoria 
silo logro. 

El mapa del laberinto 

lY como recorre un raton-robot un laberinto? En 
general, el robot debe usar un metodo preciso para 
su desplazamiento, de modo que sepa exactamente 
cual es su posici6n en cualquier momento dado; 
esto se puede lograr montando al robot sobre rue- 
das y activandolo con motores paso a paso, a menu- 
do utilizando alguna forma de re alimentation inter- 
na, como codificadores de eje. El robot requiere, 
asimismo. un conjunto de sensores para detectar la 
presencia o la ausencia de paredes, lo cual le permi- 
te construir un "mapa" del laberinto. En las compe- 
ticiones de microrratones a los robots se les conce- 
de un par de vueltas de entrenamiento, que utilizan 
para elaborar un plan del recorrido, Luego efec- 
tuan la vuelta de competicion, durante la cual se 
cronometran sus intentos por alcanzar el centro. 

Si bien los metodos exactos varian de un robot a 
otro f una respuesta es equipar por delante al robot 
con un sencillo detector tactiL Colocado en el cen- 
tro de cada cuadrado del laberinto,, puede verificar 
si tiene alguna pared exactamente delante suyo. 
Luego gira 90° en el sentido de las agujas del reloj, 
vuelve a verificar y repite la secuencia. Finalmente 
"sabra" d6nde estan todas las paredes de cada cua- 
drado del laberinto. Esta inform aci 6 n se puede al- 
macenar como un unico numero binario de cuatro 
bits; de modo que 1111 en binario represent aria un 
cuadrado con paredes en sus cuatro lados (imposi- 
ble en la practica, porque en ese cuadrado el robot 
ni siquiera podria entrar), y 0000 corresponderia a 
un cuadrado sin ninguna pared. 0111 representaria 
entonces un cuadrado con tres paredes y una aber- 
tura: un callejon sin sal id a. 

Esta information se podria retener en una matriz 
bidiinensional; en basic se podria utilizar DIM A 
(16,16) para representar un laberinto con 16 "cel- 
das" en cada direccion. El robot entonces ha de 
calcular una ruta que lo conduzca hasta A(8,8), si 
se considera que ese es el centro del laberinto. A 
menudo el robot posee un programa de ordenador 
incorporado que calcula una estructura de arbol 
para cada ruta a traves del laberinto. Muchas de las 
ramas del arbol conduciran a callejones sin salida o 
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iievaran al robot de regrcso hasta un punto que ya 
ha visitado; en estos casos las bifurcaciones se 
"podan" y no se t ienen en cuenta* El program a 
busca entonces en las bifurcaciones restantes para 
hallar la ruta con menos cuadrados, Entonces 
adopta ese camino como su ruta hacia el centro. 

Se puede adaptar este me to do para que propor- 
eione una estrategia mas eficaz. Los sensores del 
robot son esenciales para su exito. Por ejempio, 
sensores tactiles mecanicos sencillos exigen que el 
robot choque realmente contra cada una de las pa- 
redes para trazar su mapa; los sensores de proximi- 
dades pueden detectar una pared sin tocarla y un 
sensor de distancia puede detectar la posicion de 
una pared al final de un camino largo y dcspejado a 
traves del laberinto. Obviamente, cquipar al robot 
con cuatro sensores en vez de uno le permitiria 
"mirar" en las cuatro direcciones a la vez y elimina- 
ria la necesidad de hacerlo girar en cada cuadrado. 

Por la casa 

De saodo que icons que un robot puede acinar 
""tofefigefltefKire cnancio recofre un laberinto. 
En nrncbos sentkJos. d problem de ooostnnr un 
robot que pueda hallar su camino a traves de su 
casa es muy similar. El robot debe uiilizar sensores 
rvra calcular las posiciones de todos las objetos de 
_- _ habitation, y debe luego planificar una ruta 
que lo lleve, sorteando todos los obstaculos. hasta 
sq punto de destino. Los problemas adicionales que 
mplica este tipo de movimiento inteligente provie- 
oeo del becho de que el diseno de una habitation es 
T.-chisimo mas complejo que el diseno de un labe- 
rinto. Una habitation corriente no esta dividida 
snnplemente en cuadrados, ni todos sus componen- 



tes permanecen fijos en el mismo lugar. El robot 
servidor de cafe podria aprender la posicion de va- 
rios objetos; pero si se moviera una silla o si el gato 
se sentara en el suclo, el robot deberia entonces 
modificar el camino clegido. 

Este problema s61o se puede resolver haciendo 
que el robot haga un uso eon tin uo de sus sensores 
para actualizar su mapa interno. El problema del 
gato exige mayor atencion porque, dado que los 
robots no saben nada de gatos (como tampoco, si 
vamos al caso, de personas), al robot le results diff- 
cil calcular lo que debe hacer en su primer encuen- 
tro con un felino. (Que duda cabe de que el gato 
tendra el mismo problema cuando se encuentre por 
primera vez con un robot.) La mejor solution es 
equipar al robot con un sensor de movimiento, que 
es un sensor de distancia que responde a la medi- 
cion de distancias variables y, por consiguiente, 
puede hacer f rente a objetos en movimiento. Una 
vez detectado algo que se esta desplazando, lo 
mejor que puede hacer el robot es permanecer in- 
mdvil hasta que el objeto deje de moverse o se 
aleje. Puede ser que esto no parezea muy inteligen- 
te, y por cierto es menos cordial que acercarse al 
gato y acariciarlo. pero una action de este tipo es 
muy similar a la reaction de muchos animales. que 
se quedan estaricos cuando detectan objetos en 
moviiniento- 

El tema de! movimiento inteligente va, por con- 
siguiente. ligado al empleo de sensores conjunta- 
mente con un programa de ordenador. Un robot 
sin sensores no sera capaz de moverse inteligente- 
mente y, mientras mas sensores tenga instalados, 
mejor sera su conocimiento del mundo. Es este co- 
nocimiento lo que le permite al robot mostrar sig- 
nos de inteligencia. 

Pordus earnings 

Abrirse paso a traves de objetos 
desconocidos nunca es facN. La 
ruta A muestra la hue I la de un 
sencillc robot domestico 
tratando de hallar el enchufe de 
la corriente. Su unico algoritmo 
para evitar objetos (conocido 
como seguimiento de pared} es 
seguir los borcfes de m cosas 
mientras sirs sensores de corto 
alcance buscan el objeto. Este 
me'todo primitrvo puede ser muy 
eficiente en entornos sencillos, 
pero tram pas y escollos como 
los que vemos en la Mustracibn 
pueden hacerlo fracasar r 
La ruta B muestra la hue I la de un 
robot similar con un algoritmo 
Ikjeramente mejorado; cuando 
ha de girar un cierto angulo al 
hallar un objeto, prefiere hacerlo 
describiendo el menor angulo 
pcsible, dado que ello reducira 
lacantidad de "rastreo hacia 
atras" que real ice. Esta sen cilia 
modificacfdn reduce en gran 
medida su vulnerabilidad a las 
tram pas y permite que sus 
sensores de exploracibn 
controlen su comportamiento 
con mayor el i cada 




Programa modelo 

Esta vez analizaremos el ' Abacus' 1 , el paquete de hoja electronica 
que se suministra con el Sinclair QL 



Gran parte del interes que genera el Sinclair QL se 
ha centrado en los cuatro paquetes de software que 
se suministran junto con la maqulna: Quill (trata- 
miento de textos). Archive (base de datos). Easel 
(programa para grafkos) \ Abacus (hoja electroni- 
ca). Estos paquetes contienen algunos elementos 
de diseno integrado (veanse pp. 982-983). Se puede 
transfcrir datos entre ellos; los modelos de hoja 
electronica, por ejemplo. se pueden visualizar 
como graftcos o incorporar en un documento pre- 
parado. mediant e QuilL Las pant all as de visualiza- 
tion son similarcs y algunas instrucciones son co- 
rnunes a todos los paquetes: por ejemplo, tres de 
las cinco teclas de funcion del QL dan resultados 
identicos en las cuatro aplicaciones (Fl es la tecla 
Help, F2 controla la zona de "mensajes" de la parte 
superior de la pantalla y F3 llama a las instruccio- 
nes). No obstante, los programas se deben cargar y 
ejecutar por separado. 

Hay dos formas diferentes de cargar el Abacus 
(de hecho, cualquiera de los paquetes del QL). La 
primera supone colocar el cartucho en el microdri- 
ve I y despues pulsar Fl para seleccionar la option 
pantalla o F2 si se utiliza un televisor para la visuali- 
zation . Los paquetes del QL incluyen rutinas para 
la carga automatica de los programas (boot). Por el 
contrario, si ya se ha seleecionado la paiitaIJa, entre 
I run mdv1_boot (suponiendo que Abacus este en la 
unidad 1} y aparecera la pantalla initial. 

La pantalla muestra la portion superior tzqirierda 
de la matriz de la hoja electronica: en su documen- 
tation. Psion, la firma fabricante. alude a la rnisma 
como una " cuadricula", Inicialmente, se visualizan 
las columnas de la A a la F y las filas del 1 al 15, si 
bien las dimensiones maximas de la cuadricula del 
Abacus son de 64 columnas y 255 filas. (Compare 
estas dimensiones con las dimensiones maximas de 
la cuadricula del Vu-Calc, de 28 columnas y 55 
filas.) En la parte superior de la visualization de la 
cuadricula hay un con junto de mensajes, y debajo 
de ella hay una linea para entrada de datos, junto 
con information que refleja el estado del modelo 
en curso. Los mensajes se pueden eliminar (pulsan- 
do F2), pero son muy utiles para los principiantes, 
dado que explican en cada mo men to las opciones 
disponibles. Esta es, en re alidad, una zona de 
"menu" que indica que teclas de funcion se utilizan 
para controlar divers as o per aci ones y que muestra 
como mover el cursor o ir directaniente hasta una 
celda determinada, como entrar datos o texto y 
como 11am a r a las instrucciones. Sin embargo, no es 
un autentko menu: las opciones no se pueden se- 
leccionar posicionando el cursor sob re la opcion co- 
rrespondiente, sino que el usuario las debe digitar. 

La utilization del Abacus para tareas basicas es 
muy simple, si bien para un tipo de tareas mas 
avanzado Ilevara un tiempo acostumbrarse a algu- 
nas instrucciones y expresiones. El siguiente ejem- 



pk>> basado nuevamente en un presupuesto domes- 
tico, ilustrara la forma de trabajar del Abacus. 

En primer lugar, necesitamos un encabezamien- 
to general. Al igual que con el Vu-Calc, las entra- 
das de textos deben ir precedidas por comillas, A 
nuestro modelo lo Uamaremos PREVISION DE 
EFECTIVO. y pulsando la tecla de cursor apropia- 
da, pasamos a la celda Dl y simplcmcntc cntramos 
unas comillas segmdas del texto. El Abacus, al 
igual que la mayoria de las hojas electronicas, per- 
mite que el texto exceda de una celda si la adyaccn- 
te esta vacia, de modo que es facil entrar hasta los 
tftulos mas largos, 

Tambien podemos subrayar el encabezamiento, 
mejorando de ese modo el aspecto de nuestro mo- 
delo. Para hacerlo debemos desplazar el cursor 
hasta la celda de debajo de nuestro titulo (D2) y 
entrar rept ( M = '\len(d1)), Aqui rept es el equivalente 
de la instruction REPLICATE del VurCgk, y = le dice 
al programa que simboio utiJizar (estamos utilizan- 
do el signo "iguaP como un subrayado doble). El 
resto de la instruccion {Ien(d1 )) es la forma de detir- 
le a Abacus que repita el sumbolo para toda la longi- 
tud del texto de la celda Dl . 

A diferencia del Vu-Calc, que posee una anchura 
de column a fija de nueve caracteres, Abacus nos 
permite seleccionar anchuras distintas para diferen- 
tes aplicaciones. En nuestro caso necesitamos que 
la columna A sea mas ancha, para que haya espacio 
suficiente para entrar texto de longitud variable, y 
ademas precis amos que las otras columnas scan 
mas esrrechas, de modo que se puedan visualizar 
los datos para seis meses. Para hacer esto, utiliza- 
mos la tecla de funcion F3, seguida de G (para se- 
leccionar la instruccion GRID, cuadricula) y W (para 
la instruccion WIDTH, anchura). La line a de entrada 
indicara que la anchura actual es 10, Nosotros de- 
seam os cambiar la anchura de la columna A a 15, 
de modo que te tie amos 15 en respuesta al mensaje. 
El programa ahora nos solicitara una serie de cel- 
das a las cuales se aplicara la nueva anchura. En- 
trando A y A como los dos parametros indicamos 
que solo la columna A debe poseer esta anchura. 
Luego debemos volver a pasar por el mismo proce- 
dimiento, esta vez seleccionando una anchura de 6 
y una serie de B a G. Con esto obtenemos lugar 
suficiente para visualizar las cifras de seis meses. 

Ahora hemos de entrar etiquetas para las colum- 
nas de "meses". Ello se puede hacer simplemente 
digit an do el texto corrcspondiente en cada celda, 
pero Abacus posee una facilidad especial para los 
nombres de los meses. Dcsplace el cursor hasta A3 
y digite row=month(col()-1) (fila=mes.,.). La linea 
de entrada solicitara ahora una serie entre B y G en 
respuesta a los mensajes, y las columnas se etique- 
taran automaticamente. Hay nombres de meses de- 
masiado largos como para caber en nuestras colum- 
nas ajustadas, por lo cual hay que abreviarlos. Esto 



se realiza volviendo a digitarlos, recordando colo- 
car las comillas para indicar texto. 

El siguiente paso consiste en entrar encabeza- 
mientos para las diversas filas, desplazando el cur- 
sor hacia abajo una linea despues de cada entrada 
(la men table m en te , Abacus no lo proporciona 
co mo una facilidad automatica). Nuestro modelo 
da por supucsto que el cabeza de familia es un ven- 
dedor cuyos ingresos se componen tamo de un sala- 
rio basico como de comisiones. El modelo permite 
calcular los ingresos en base a comisiones sobre las 
ventas pievlstas mas el saiaiio basico. Las ventas 
reales conseguidas se pueden entrar a medida que 
vayan transcurriendo los meses, y se pueden enton- 
ces realizar previsiones revisadas para los meses fu- 
tures , Los valores negativos se visualizan entre pa- 
rentesis en la cuadricula terminada, Los encabeza- 
mientos a entrar son estos: Ventas: pre vistas y rea- 
les: Comision; Salario basico; ingresos to tales; 
Gastos: hipoteca. impuestos, agua, electricidad, 
gas. telefooo: Gastos totales: Llquido positivo (o 
■egatiw): Balance bancario de apertura y cierre. 

D e sp ee s de haber entrado los encabezamientos 
de coiwmms j Sas T podemos empezar a rellenar 
coo oft as nuestra hoja electronka, Primero entra- 



les*\ se utiliza la instruction ECHO(eco), Con el cur- 
sor aun en B9 ? el sistema pedira una serie sobre la 
cual reproducir el subrayado: rcsponda con 
B14:G14. (Si se olvido dejar filas librcs cuando 
entro los encabezamientos, estas se pueden insertar 
empleando la instruction GRID.) Para completer el 
formateado, se debe "justificar por la derecha" 
todo el subrayado utilizando la instruction J para la 
serie de B2 a G14. Ello asegurara que todos los 
guiones queden alineados con las cifras, 

Ahora ya se pueden entrar los gastos, utilizando 
la formula de fila (row) para cifras mensuales estan- 
dares tales como la hipoteca, o simplemente en- 
trando cada cifra en las celdas corresportdientes 
para pagos irregulares, como pueden ser fa electri- 
cidad y el gas. Los gastos totales se pueden, enton- 
ces, definir como la suma de todas estas cifras , de la 
mis ma forma que se cakularon los ingresos totales. 

Del mismo modo, la cantidad h'quida positiva o 
ncgativa se puede calcular como los ingresos totales 
menos los gastos totales. Lamentablemente, Aba- 
cus parece ignorar cualquier parte de una instruc- 
cion despues de un espacio, de modo que no pode- 
mos entrar simplemente row=ingreS0S totales - 
gastOS totales. Debemos, por consiguiente, volver a 




LING S QV sf flrtaLir ftH',, 



MENU DE DISENQ 




FACILIDAD DE MESES 




\ las previsaooes de ventas para los seis meses 
en In pantafla Estas pueden ser, por 
3»0Qa 24OO00L 260 000. 220 000. 
3Mi ftasv t se debeo entrar sin el 
> se fsafci estrar toda- 
> la a> 
r - >^ 

ta§ ea respoesta a los measa jes y la o o m i s ioo se 
cakatsra y se visualizara a! instante. 

Si ei salario basico es de 34 000 ptas mensuales, 
se puede entrar en la ceida Bll como 
ro#f=340QCL otra vez para la serie de B a G. Ahora 
se puede digitar la formula para ingresos totales en 
B13. La misma es row=SUm(col} con una serie de 
fOas de 0 a 11 y una serie de column as de B a G. 
Esfco completa el calculo de los ingresos, pero sc 
puede mejorar la presentation del modelo agregan- 
cx> ray as arriba y abajo de la fila de "ingresos tota- 
les Para hacer esto, desplace el cursor hasta B12 y 
rBtre row = rept( " - " , width (} - 2) . Abacus respondera 
produciendo cuatro guiones debajo de cada cifra de 
'salario basico". Para llevar a cabd la misma opera- 
tion en la fila 14, produciendo por consiguiente 
guiones arriba y abajo de la fila de "ingresos tota- 



designar la linea de ingresos totales como "ingre- 
sos" y entrar row =ingreS0S -total, nuevamente para 
la serie de B a G* Ahora apareceran en la pantalla 
las en trad as y las salidas liquid as para cada mes. 

EI paso final cons is tc cn calcular los balances 
baDcarios, Entre primero el balance inicial; un des- 
. - . ■' " r T ,:-. por ejemplo. Entre esta 
mifrtari como —50000. Ahora calcule el balance 
de oeine, atffizandb la formula row =net0^ apertura 
m __\ para la ya familiar serie de B 
a G. Elio pitduora el balance de cierre de enero. 
Los balances de apertura para los otros meses se 
caleulan entrando en C27 la formula r0W=B28. 
Para hacer este trabajo para todas las columnas, 
primero es necesario cambiar el orden de calculo de 
fila a coiumna utilizando la instruction DESIGN. En- 
tonces se calcuiaran todos los balances de apertura 
y cierre y se volver an a calcular de inmediato si se 
modificara cualquier cifra, Tal como est a, nuestro 
modelo refleja los balances negativos como cifras 
preccdidas por un signo menos. Para cambiar este 
formato de modo que una cifra negativa se indique 
me di ante pa rente sis, utilizamos la instruction 
UNITS y respondemos al mensaje con B. 

Ahora nuestro modelo ya esta completo. Se 
puede salvar selection an do la instruction SAVE con 
un nombre de archivo adecuado. Despues se puede 
imprimir o se pueden entrar cifras distintas. 



Difundiendo la palabra 

Un atractivo diseno de pantalla, 
bjenas caracterfsticas y una 
amplia facilidad de 
mensajes/ayudas hacen que el 
Abacus sea una hoja electron ica 
agradable y tad I de utilizar, Aqui 
mostrarnos la instruccion ECHO 
en accion copiando una fila a 
otfa. las op clones de la 
instruccidn DESIGN para 
formatear la hoja electron! ca y la 
facilidad month (meses), que 
genera los nombres de los 
meses con la sola pulsacidn de 
una tecla. Tambien se puede 
apreciar la pantalla por detecto 
con ef menu de mensajes 
{prompts) arriba, y la hoja en 
bianco mostrando el menu de 
instrucciones (commands) 



Prngramacidn/Progratmas de utilidad 



En busca de nombres 

Ya estamos en condiciones de ampliar la utilidad de busqueda de 
variables para que incluya la facilidad de cambio de nombres 



Copia intellpnte 

La rutina de sustitucidn ha de 
d&splazar grandes secciones del 
programs en basic hacia arribay 
nacia abajo dela memoria 
cuando inserts nombres de 
variables de (liferents longitud, 
Ai hacerio satisface las cuatrc 
posibies condiciones de las 
dfrecdones de origen y de 
destino. Si siempre copfara 
desdeel principle del bloque 
origen, entonces, cuando la 
cabeza del bloque de destino se 
superpusiera con la cola del 
bloque origen, lo que copiara se 
escribiria encima de aigunos de 
los datos dei origen, Una rutina 
de copia " inteligenle" detectara 
este caso y evitara la corrupcion 
cop i an do este bloque origen a 
parti r de la cola. Una rutina de 
copia Jl tonta" siempre copia a 
parti r de la cabeza del bloque 
origen 



Nuestro programa para reemplazar variables es 
una utilidad mas compleja que la simple busqueda 
de nombres de variables que desarrollamos en las 
paginas 1144 y 1180. For este motivo necesitamos 
anadir un proerama en codieo maquina. La CPU 
6502 del BBC Micro y la CPU 6510 del Commodo- 
re 64 pose en el mismo lenguaje assembly, de modo 
que es una buena idea analizarlas juntas, 

Nuestra primera tarea consiste en encontrar un 
metodo de retener dos programas separados en la 
memoria del ordenador ai mismo tiempo. Como ya 
hemos explicado. en el BBC Micro podemos hacer- 



Cuestiones cfe memoria 



SC900 



SC500 
SC400 



scooo 



SC900 



SC500 
SC400 



SCOOO 



SCBOO 



SC600 
SC500 



SCDOO 




CCPIA 



lo alterando las variables incorporadas en basic 
PAGE e HIMEM. En el Commodore 64 necesitamos 
un programa en codigo maquina para alterar los 
diversos apuntadores de la memoria de pagina 
cero. La primera parte del listado en lenguaje as- 
sembly, que comienza en la etiqueta SWITCH, hara 
esto pOT nosotros. 

La rutina SWITCH nos peimitira acorn odar los 
programas en basic: uno empieza en la direccion 
800 hexa (el sitio habitual para un programa cn 
basic) y el otro comienza en la dire-ccidn 9000 hexa. 
SWITCH comienza por mirar el apuntador TXTTAB 
para ver cual de las zonas de programa es la actual, 
y cambia entonces los valores del apuntador para 
convertir en actual la otra zona de programa. 

TXTTAB se cambia para que apunte al principio de 
la nueva zona de programa, luego FRET0P y MEM- 
SIZ deben apuntar al byte que sigue al ultimo byte 
de la nueva zona de programa, mientras FRESPC 
apunta al final de la nueva zona de programa, El 
programa busca entonces en la cadena de apunta- 
dores de direcciones de enlace (vease p. 1184) para 
hallar el final del programa en basic, utilizarido 
VARTAB como apuntador temporal Cuando en- 
cuentra los dos bytes de direccion de enlace a ccro 
que indican ei final del programa, increment a dos 
veccs el apuntador anterior y copia el result ado en 
ARYTAB y STREND. De este modo, tanto VARTAB 
como ARYTAB y STREND apuntan a I byte que sigue 
inrnediatamente despues al programa en basic. 

Los principales cambios que hemos de introducir 
en ei programa en basic son las subrutinas extras de 
las linea s 30500 y 30600. La primera de estas en- 
cuentra el final del programa en basic, utilizando 
los bytes de longitud de linea en la version para el 
BBC y los apuntadores de la siguiente linea en la 
versi6n para el Commodore 64. 

El cam bio en I os nombres de variables lo efectua 
realmente la subrutina de la linea 30600. Cuando el 
nombre antiguo de la variable y el nombre nuevo 
tienen la misma longitud, el nuevo nombre simple- 
mente se puede escribir encima del antiguo. Cuan- 
do la longitud del nombre antiguo y la del nombre 
nuevo son distintas, el procedimiento es algo mas 
complicado. En este caso, el programa debe o bicn 
hacer espacio extra, o reducir todo el espacio inne- 
cesario en el programa que este modificando, y 
efectuar las modifications correspondientes en las 
variables que utilice para llcvar el registro de su po- 
sition en el programa que esta alterando. Asi mis- 
mo, debe cambiar el byte de longitud de Ifnea en la 
version para el BBC y los apuntadores a la linea 
siguiente en la version para el Commodore 64. 

Ei programa tambien emplea subrutinas en codi- 
go maquina para crear o suprimir espacio. Aunque 
esto se podria hacer en basic, sena inaccptable- 
mente lento incluso en un programa de tamano 
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Programas de utilidad/Programaciori 



medio, con mi I lares de bytes a desplazar cada vez. 

Hay dos sub rutin as en lenguaje maquina: UP 
para hacer espado extra y DOWN para suprimir el 
espacio innecesario, Los detalles del bloque de pro- 
grama a desplazar se pasan al codigo maquina a 
traves de las posiciones de memoria CURB, LAST y 
DIFF. 

Para la subrutina UP es necesario inicializar las 
siguientes posiciones de memoria: 

CURB: direction de la parte inferior del bloque a 
desplazar 

LAST; uno menos que la direccion de la parte su- 
perior del bloque a desplazar 
DIFF; cantidad de bytes a liberar 

y para DOWN es necesario initial izarlas asi: 

CURR: direccion de la parte superior del bloque a 
desplazar 

LAST: uno menos que- la direcci6n de la parte in- 
to ferior del bloque a desplazar 

DIFF: cantidad de bytes a obtener 

Observe que las dos subninnas empiezan en extre- 
mes opuestos del bloque a desplazar y realizan sus 
desplazamientos en sentidos cootrarios. Esto es 
para evitar que los datos se sobreescriban antes de 
haberlos desplazado. 

Para utilizar la version BBC del programa de sus- 
titucion de variables , priinero debe entrarse (o car- 
garse, LOAD) y luego ejecutar (RUN) el programa en 
assembly para poner en la memoria el codigo ma- 
quina. Despues cargue (LOAD) el programa a modi - 
near y digite: 

P%-PAGE 

Esto pasa la direccion de comienzo del programa al 
programa de sustitucion de variables. Luego ponga 
en PAGE un valor por encima de LOMEM, y cargue 
(LOAD) y ejecute (RUN) el programa de sustitucion 
* de variables. Puede volver al programa modificado 

medtame: 

PAGE=P% 

Para utilizar la version del programa para el Com- 
modore 64, tambien necesitara poner en la memo- 
ria el codigo maquina, ya sea con el programa car- 
gador de basic o bien ensambiando el codigo fuen- 
te> Si ensambla el codigo fuente, o carga el c6digo 
maquina directamente como codigo maquina, ten- 
dra que colocar (POKE) ceros en las direcciones 
36864, 36865 y 36866. Esto equivale a renovar 
(NEW) la zona para programas alternativa, 

Despues de carga r el codigo maquina, SYS 491 52 
cambiara de una zona de programa a la otra. Si 
olvida donde est a, puede averiguarlo media nte 
PRINT PEEK(44), que dara 8 para la zona de progra- 
mas normal y 1 44 para la zona dc programas alter- 
nativa. 

Una vez que tenga en el ordenador el codigo ma- 
quina, puede cargar (LOAD) el programa a modifi- 
car en la zona de programas normal y el programa 
para sustitucion de variables en la zona de progra- 
mas alternativa, ejecutando (RUN) luego el progra- 
ma de sustituci6n de variables. 



Conmutacidn y copia C64 

TO DIR=49152 

20 FOR LINEA=1000 TO 1180 STEP 10 
30 S-0 

40 FOROIR-DIR TO DiR+7 

50 READ BYTE 

60 POKE DIR. BYTE 

70 S=S+BYTE 

80 NEXTOIR 

90 READ SUMACONTROL 

100 IF So SUMACONTRO L THEN PRINT" ERROR DE DATOS EN 

LINEA r ;LINEA:END 
110 NEXT LINEA 

120 POKE 36864.0: POKE36665,0:POKE36866,0 
1000 0ATA1 62,0,164,44,1 92,8,208,9,787 
1010 DATA160,160,S2,72,192,169 < 144 > 208,1137 
1020 OATA7,160 > 144,32 1 72 1 192,169 1 8 1 784 
1030 D ATM 62 r 1 , 1 34 , 43 , 1 33 r 44 , 1 34 , 45 , 696 
1040 DATA1 33.46,160,0, 177,45.170.200.931 
1050 DATA 1 77 ,45, 224,0, 208,240, 201. 0.1095 
1060 DATA20fl.236.230 r 45,208,2.230.46.1205 
1070 DATA 136,16,24 7, 1 65 ,45 , 1 33 ,47, 1 33 ,922 
1080 0ATA49 P ia5,46, 133,48,133,50,96,720 
1090 DATA1 34,51 ,132,52,134,55, 132,56.746 
1100 DATA2O2,136,134,53,-f32,54 l 96,l60,967 
1110 D ATA0 J 77 . 25 1 , 1 64, 255 . 1 45 . 251,1 60 . 1 403 
1120 DATA0, 1 96,251 .208.2. 1 98,252,198, 1 305 
1130 DATA251 ,165.253,197,251,208,234,165,1724 
1140 OATA254,197,252.20S,228.96.164,255,1654 
1150 DATA1 77,251, 160,0.145,251, 230,251. 1465 
1160 GATA208,2.230,252,1 65,253,197 .251, 1558 
1170 DATA208.236,165.254,197,252,208,230.1750 
1180 DATA96.0,0,0,0.0.0.0 r 96 



Sustitucion de variables 

Commodore 64 

Introduzca estas modificaciones en el programa de 
p. 1180: 

30005 INPUT"REEMPLAZAR P0R";RS 

30006 CURR=251 

30007 LAST=253 

30008 Dl=255 

30035 GOSUB 30500 

30036 IF ERR THEN PRINT" NO ENCUENTRO EL 
FINAL DEL PROGRAMA":END 

30060 IF SIGLiNEA=0 THEN END 
30065 CURRLINETEXTPTR 
Eliminar la ffnea 30085 

30460 IF N0MBRE&=T& THEN GOSDB 30600 
30465 IF ERR THEN PRINT" NO HAY LDGAR 
EN LA LINEA";NUMLINEA:END 

BBC Micro 

Introduzca estas modificaciones en e! programa de 
p. 1145: 

30005 INPUT" Reemplazar por"; 
SUSTITUCION^ 

30006 CURR = &70 

30007 LAST = &74 

30008 DIFF = 8,78 

30055 GOSUB 30500 

30056 IF Outof room THEN PRINT" No encuentro 
el final de! programa": PR I NT" PAGE en 
lugarequivocado?":END 

30060 Apuntadortexto=P% 
30070 IF Numlinea > 32767 THEN END 
30105 Bytelongitud=Apuntadortexto 
30460 IF Nombre£=Objetivog THEN GOSUB 
30600 

30465 IF Outofroom THEN PRINT"No hay lugar 
en la linea";Numlinea:END 



Copia 


BBC 


10 MODE 7 




20 HlMEM=HiMEM-&100 


30 CURR - &70 




40 LAST -&74 




SO DIFF = m 




60 FOR PASS = 


1T02 


70 P%=HIMEVr 




80[ 0PT1 




90 UP 


LDY #0 


100 UP1 


LDA (CURR).Y 


110 


LDY DIFF 


120 


STA (CURR).Y 


130 


LDY *0 


140 


CPYCURR 


150 


SNE UP2 


160 


OECCUHPl-i-1 


170 UP2 


OECOJRR 


130 


LDA LAST 


190 


CMPC0RR 


200 


ONE UP1 


210 


LDALAST+1 


220 


CMP CURR +1 


230 


9NE UP1 


240 / 


RTS 


250 DOWN 


LDY DIFF 


260 


LDA (CURR).Y 


270 


LDY #0 


2&0 


STA {CURR),Y 


290 


we cum 




BNE D0WN1 


310 


IMC CURR +1 


320 .D0WN1 


LDA LAST 


330 


CMP CURR 


340 


SHE DOWN 


350 


LDA LAST 41 


360 


CWPCURR+1 


370 


BNEDOWU 


3B0 


RTS 


390] 




400 NEXT PASS 




410PRINTUP.-D0WN 
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J u egos 



Trazos 



iUna guerra de trincheras? No: este juego nos propone mas bien 
una autentica guerra de Irneas. He aqui una version para el 
microordenador Dragon 




Dos jugadores se enfrentan para dividirse el espa- 
cio vital. Cada uqo de ellos debe esforzarse, al irse 
desplazando, por no cortar jamas su trazado o el de 
su adversario y por no salirse del rectangulo dibuja- 
do en la pantalla. Utilice las palancas de mando o 
las siguientes teclas: 

Jugador de la derecha; P, L, ; y . 

Jugador de la izquierda: W, A, S y Z 



10 REM********* 
20 REM *TRAZ0S* 
30 REM ********* 
40 GOSUB 850 
50 GOSUB 630 
60 ON JK GOTO 150 
70 FOR 1 = 1 TO 50 
80 NEXT I 
90 DS=INKEY$ 

100 C1=(DS= M L ,, )-(DS M ;")+32*((D$= J< P M )- 
(D$=V)) 

110 C2={DS= "A")-(DS= M S")+32*((D$= N W") 

-m=T)) 
120 IF C1o0 THEN D1-C1 
130 IF C2<>0 THEN D2=C2 
} 140 GOTO 270 

150 K0=JQYSTK (0) 

160 K1=J0YSTK(1) 

170 K2=J0YSTK (2) 

180 K3=JOYSTK(3) 

190 IF K0<26 AND K1 >37 THEN S1 = - 1 

200 IF K0>37 AND K1<26 THEN S1 = 1 

210 IF K0<26 AND K1<26 THEN $1 = -32 

220 IF K0>37 AND K1 >37 THEN S1 =32 

230 IF K2<26 AND K3>37 THEN S2=-1 

240 I F K2>37 AN D K3<26 THEN S2= 1 

250 JF K2<26 AND K3<26 THEN S2=-32 

260 IF K2>37 AND K3>37 THEN S2=32 

270 IF SloOTHEN D1=S1 

280 fFS2<>0THEND2=S2 

290 P1 = P1+D1 



300 IF PEEK (P1)<> 128 THEN 360 

310 POKE P1 ,J1 

320 P2=P2+D2 

330 IF PEEK (P2)<>128 THEN 410 

340 POKE P2.J2 

350 GOTO 60 

360 F2=F2+1 

370 GOSUB 590 

380 IFF2=10THEN46G 

390 DS- IN KEYS 

400 GOTO 50 

410 F1=F1-M 

420 GOSUB 590 

430 IFF1=1Q THEN 500 

440 DS— INKEYS 

450 GOTO 50 

460 CLS 

470 PRINT® 165, "GANA JUGADOR IZQUIERDA" 

480 PRINT® 202,F2; M A";F1 

490 GOTO 530 

500 CLS 

510 P8ENT@ 165, "GANA JUGADOR DERECHA" 

520 PRSNT@2Q2 5 F1;' i A";F2 

530 R$=INKEY$ 

540 PRINT@266, "OTRA?" 

550 R$=fNKEY$ 

560 IF RS= " " THEN 540 

570 IF R$o"N" THEN RUN 

580 END 

590 FOR I =5 TO 255 STEP 5 

600 SOUND 1,1 



610 NEXT I 
620 RETURN 
630 CLS0 
640 C=207 
650 J1 =239 
660 J2 = 255 
670 P1=1272 
680 P2-1256 
690 D1=-1 
700 D2-1 

710 FOR 1=1 024 TO 1055 
720 POKEI.C 
730 PQKEI+448,C 
740 NEXT I 
750 FOR 1-1 TO 13 
760 POKE 1-32 + 1024,0 
770 POKE 1*32+1055,0 
780 NEXT I 

790 PRINT® 480, "JUGADOR IZQUJERDA";F2 ! 

"JUGADOR DERECHA" ;F1 ; 
800 POKE P1 P J1 
810 POKE P2.J2 
820 S1=0 
830 S2=0 
840 RETURN 
850 CLS 

860 PRINT@ 170, "PALANCAS MAND0 ? " 

870 D$ = INKEY$ 

830 IF D$=" "THEN 870 

890 JK=-(DS="S») g 
900 RETURN £ 
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Vision periferica 



He aqui un repaso a algunos 
conocidos perifericos y utiles 
indicaciones que ei usuario 
deberia tener en cuenta 
antes de adquirirlos 




Hasta hace poco tiempo, el periferico mas Impor- 
tante para el usuario de un ordenador personal era 
un modulo enchufablc que contema memoria 
extra, La memoria era cara y maquinas como el 
Z\-m y e] Yic-20 se diseriaron para naantener las 
costes al minimo: de hecho. el ZX-81 no ampliado 
le ofreria al usuario tan solo setecientos y pico 
bytes con los que escribir programas. Las maquinas 
de hoy en dia ya vienen equipadas con hasta 64 K 
de RAM (algunas, como el QL, ofrecen todavia 
mas) y, por consiguiente, en la actualidad raramen- 
te se requieren 4L RAM packs". EI usuario de hoy 
dia tienc multitud de perifericos entre los que esco- 

ger: los modems permiten la comunicacion entre Ciciamoc Ho almaftDlUimiaritfl 

usuarios que viven a cientos de kilometres de dis- OlblBllKIO UC dlllldbClldllllCIIIU 

tancia el uno del otro, los vehiculos motorizados o E[ dispositivo de aimacenarnlento mas comun para utilizar con un 

los brazos- robot se pueden controlar utilizando una microordenador es la habitual grabadora de cintas de cassette de 

interface adecuada, y se pueden emplear sintetiza- audio corrientes'. Esta ofrece la ventaja de ser sencilla de utilizar y 

Horns de vo? rwa entretenimiento o con fines edu- relativamente economica, pero sus inconvementes se hacen 

dores ae voz para eniretemmiemo o con nncs eou evjdente$ megui(fcL cargar programas ocupa mucho tiempo y 

cativos. es dificil llevar el registro exacto de que es lo que hay en una cinta 

Si bien existen en el mercado muchos dispositi- determinada. Las unidades de disco son mas rapidas y mas 

vos perifericos diferentes, la mayoria solo se fabri- fiables, pero cuestan mas. La mayoriade los ordenadores 

ran nara la* manning mas vendidas FsTa es una pe rson ales esta n limitadosa un tipo de unidad de disco y 

can para las maquinas mas venaiaas. j-sxa es una a | gunas{Je ^ stas (en p articu | ar | 0S modelos de Commodore) son 

consideracion que se debe tener presente al decidir notablemente lentas en operation. La mayor parte de las 

que maquina adquirir; los usuarios de un Spectrum, maquinas personales continuan utilizando unidades de 5 1/4", 

tm Gmmodore v un Acorn siempre tendran mas Pero ahora se estan popularizando mas las unidades de 3 o de 3 

r\ ■ ^ „ 1/2". La unidad de disco Onc/Atmos, porejemplo, emplea discos 

eteoaoo^ que qiueoes opten por un One o un ^ m unacapacidafJ de 1 60 K por cada lado. El BBC Micro es 

SofiL La creadon de un mercado de perifericos sumamente flexible, ya que permite que se le conecten muchos 

_ _ - _^ — — ceiaas Bei a ? u tiempo. si s stemas de disco diferentes. Ei Torch DiskPac* convierte 

bien el recientemenie introducido estandar MSX ZS^ofmZ^t^^^^ 

hara que las cosas resulten mas moles al permitir y^jcdeowiioriaadiaonaJes- El Torch proporciona, asimismo, 

que todas las maquinas que respondan a las especi- cuatro programas de 'pestidfT y viene con una version de! basic 

ficaeiones MSX utilicen los mismos accesorios- BBC que ess disenada para trafeajar am el procesador Z30. 

Una consideracion primordial para el comprador ^JKfiS^WjS-™ 

de perifericos es el tema de la compatibiiidaa: todo indeperKfienies nan produodo interfaces para disco especiales. 

lo que se compre debe funclonar con cualquier otro Sinclair ha producido el sistema Interface Uno, Microdrive, que 

dispositivo que se pueda llegar a adquirir en el futu- utliiza un bucle de cinta que puede almacenar atrededor de 85 K 

rn Fl piemnlo HsiSro en este sentido es el del Soec- de datos - La cinta es, a comptetamente bajo el control del 

ro, HI ejempio ciasico en este senuao es eiaei spec 0 rdenadory cualquier dato individual se puede locate en 

trum, Muchos usuarios de esta maquma nan com- Question de unos 10 s, Esto representa un rendimiento que esta a 

prado la Interface Uno y uno o dos microd rives, medio camino entre el de una grabadora de cassette y una unidad 

solo para descubrir que akunos de los perifericos de disco, a un precio considerablemente inferior al del sistema de 

s s i ^ a* ^ unidad de disco mas economics La Interface Uno ctrece la 

que ya poseian (e mcluso parte de su software) no yentaja de propordonar una imefface RS 232 (no estandar) y se 

funcionan teniendo instalada la Interface Uno. puede utilizar para "conexidn en red": el enlace en red de hasta 

Sin embargo, de mantenerse la compatibilidad 64 Spectrums o maquinas QL. 

~ nfr ~ Htcrindtivnc la Hp^rinn Hp arrps:nrin<; nara Un competidor del sistema Interface Uno es la RotroniCS 

entre dispositivos, la eleccion de accesonos para su WaMr| ^_ ^ sta ^ mmn emp , ea bucles de tm para retener 

maquina puede incrementar en gran medida el datos, pero incluye interfaces RS232 y Centronics y un programa 

atractivo que posee la inform atica. Perifericos ade- para tratamiento de texios incluido en su precio. Las cintas se 

cuados pueden permitirle disenar un sistema de or- suministran en tres tamanos diferentes {16, 64 y 128 K), 

Hern dor rine se adante a sus nronias exisencias oar- obteniendose la mayorvelocidad operativacon la cinta demenor 

denador que se aaapte a sus propias exigences par ca jdad En , a f 0t0 grafia vemos el Retronics Wafadrive, la 

ticulares, y cste sistema se puede ir modiiicando unidad de disco 0ric/Atmos p el Torch Disk Pack y la Interface Uno 

luego a medida que sus necesidades evolucionen. con microdrive de Sinclair 







re/Perifericos 













Dispositivos para graf icos 

La production de grSficos con un ordenador personal se 
simplifica considerablemente si se utiliza alguno de los muchos 
tip os diferentes de dispositivos para graf icos, Los mas 
economicos son los I apices opticos, que se pueden emplear para 
"dibujar" directamente en la pantalla de visualization mediante el 
empleo de una celula fotoelectrica para detectar la position de la 
punta cJel lapiz mientras toca fa pantalla. Un desar, r ollo basado en 
este sistema es ei Stack Light Rifle (veanse pp. 710-71 1). 
A much as personas Jes resulta diflcil dibujar "a mano alzada" en 
una pantalla de visualization. Segutr Imeas sobre una superficie 
plana es considerablemente mas fad y se fabrican muchos 
dispositivos que permiten que los usuarios hagan esto. Las 
tabl Ellas para graf icos utilizan un lapiz especial que le transfiere al 
ordenador cualquler movimlenta efeetuado sobre la superficie de 
la tabliila; ello significa que se las puede utiliza r para dibujar 
image nes a mano al2ada o para calcar imagenes impresas, Otros 
dispositivos de "dibujo" son tos tiraf Eneas digitales, que hacen 
uso de reslstencias variables situadas en un brazo mecanico para 
detectar la posEcion del punz6n que Elevan fijado en la pun ta del 
brazo. Aqui vemos la tablilla Grafpad de British Micro, el tiralineas 
Robot Plotter y el lapiz bptico y Light Rifle de Stack. 



Modems 



El desarrollo de modems economicos paraordenadores 
personal es permite a Jos usuarios comunicarse entre si a t rave's 
de la red telefdnica. Para las maquinas equlpadas con una 
interface RS232 estandar se han producidc numerosos modems; 
con el software adecuado, estos pueden acceder a la base de 
dates Prestel, que tiene much as paginas dedicadas enteramente 
al usuario de ordenador personal. Asimismo, los modems se 
pueden utiliza r para comunicarse con otros usuarios a traves de 
"tablones de anuncios 1 (bases de datos frecuentemente 
mantenidas por entusiastas de los micros). Sin embargo, en este 
campo vuelve a plantearse la cuestrdn de la compatibilidad: 
distintos tab fo nes de anuncios utilizan diferentes velotidades de 
transmisio'n, y un modem que puede utilizar-ei Prestel a menudo 
es inadecuado para comunicaciones con un taol6n de anuncios. 
Ni el Spectrum ni el Commodore 64 poseen interface RS232 
incorporada r y porconsiguiente no pueden emplear modems 
e stand a res. Para el Spectrum, el modem mas vendido es el 
Prism VTX5000. Mediante software en cinta dos Spectrums 
e Qui pad os con modems Prism pueden intercambiar prog ram as o 
datos. Commodore suminlstra su prop to modem para usar con el 
64, y ha creadc su propEo sistema, Compunet, para conectar en 
red a los usuarios de Commodore 64. 
Los usuarios de un modem deben estar siempre atentos a I reloj, 
dado que los entusiastas pueden encontrarse enseguida con 
cuantiosas facturas telefdnicas. Las tarifas anuales fijas para 
usuarios de Prestel y el Compunet son igualmente elevadas. La 
fotografia muestra el Prism VTOQOQ y el modem de Commodore. 




Sintetizadores 
de voz 

Muchas maquinas personales 
populares pueden producirvoz 
con la adicibn de una unidad 
para smtesisde voz. Las 
unidades existentes se pueden 
agrupar en dos categorias: una 
que se suministra con un 
vccabulario fiio de unas 100 
pafabras diferentes, y otra que 
utiliza aldfonos (con junto de 
diferentes sonidos y pausas a 
parti r de los cuales se 
constmyen las palabras). 
La gama Currah de unidad de 
vozemplea el sistema de 
altifonos, y la flrma produce 
mddulos tanto para el Spectrum 
(Microspeech) como para el 
Commodore 64 (Speech 64). 
Algunos juegos para el 
Spectrum y el Commodore 64, 
en particular los producidos por 
Ultimate, poseen voz 
incorporada; 6sta se produce 
automaticamente si se conecta 
una unidad Currah. La fotografia 
muestra el Speech 64 de Currah, 
y el Sweetalker de Cheetah para 
el Spectrum. 
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Dispositivos controlados 
por ordenador 

Los ordenadores se pueden utiiizar fadimente para controlar 
dispositivos del mundo * reai Ma apikacion q ue se crta 
generalmente es el control de un sistema de caJefaccton central 
domestlco; e3Eo es bastante factible, aunque casi r*o merece la 
pena, dado que tales sistemas suelen llevar Encorporado un 
interrupter de reloj perfectamente eficaz. Mucho mas 
interesantes son los di versos vehiculos con ruedas. La Valiant 
Turtle es u n vehiculo que se parece algo a una tortuga y que 
puede producir ios graficos que utifiza el lenguaje logo, Este 
dispositive se puede acoplar al Spectrum, al Commodore 64 y al 
BBC Micro, y emplea un haz infrarrojo para comunlcarse con el 
ordenador. El BBC Buggy es un dispositive de tipo similar. 
En la fotografia vemos la Valiant Turtle y el BBC Buggy. 

Impresoras-plotter 

Para qui en utiiice un ordenador personal para el desarrollo de 
programas o para tratamiento de textos, fa adquisicidn de una 
impresora resulta esencial. La mayor fa son matriciales o de 
rueda margarita Las primeras utiiizan una cuadricula de 
pequeftos pontos para construir eada letra, permitiendo imprimir 
graficos, y son de operacion ra r pida 1 aunque su cahdad de 
impresion es inferior a la de las de rueda margarita, que son 
basicamente maquinas de escribir controladas por ordenador. Un 
sistema alternativo es la pequena impresora-plotter que se 
comercializa para los ordenadores Tandy, Atari, Commodore y 
One. Esta utilize un papei de unos 10 cm de ancho y esta 
equipada con cuatro pequenos lap ices de punta esferica que 
permiten escritor textos o producir graficos multicolores. El texto 
se "dibuja' de lamisma forma que los graficos, y el dispositive 
tiene programado un juego compfeto de caracteres. Otra 
alternative es la que represents la impresora termica Epsoi P40. 
que empiea una columna de elementos de ealor para 'quemar" 
los caracteres sobre papef especial. Estaes sumameiflB 
economica, a pesar de lo cual proporciona una calidad de 
impresitin razonable y funciona con pi I as recargables. Tambien el 
papel que utifiza es bastanle estrecho, pero puede producir una 
salida impresora de 80 columnas si se emplea la mod alidad de 
impresion com pacta. Aqur vemos la impresora- 
p I otter (para Tandy/Radio Shack) 
y la Epson P4Q, 



Pafancas de mando 

El primer periferico que suele adquirir el usuario de un ordenador 
personal es la palanca de mando, Muchos ordenadores estan 
equipados con interfaces adecuadas, y algunas de las m&quinas 
mas modemas vienen ya con paiancas de mando como estandar. 
Las paiancas mas comunes utiiizan los conectores "D" de nueve 
padas que fueron adoptados en primer lugar por los micros 
Commodore y Atari, y desde entonces lo ban sido por numerosas 
empresas independierites. Las pafancas BBC no son estandares, 
de modo que en este caso las opciones son mas limitadas; en sus 
micros Plus/4 y 16, lafirma Commodore ba ignorado su propio 
estandar, con lo cual ha obtigado a los usuarios aemplear las 
nuevas paiancas disefiadas por la misma. 
Recientemente Sinclair ha comercializado la Interface Two (dos), 
interface para palanca de mando y puerta para cartucho de ROM 
para e! Spectrum, Hasta ese momenta no se habia 
proporcionado para esta ma'quina ninguna interface "oficial" para 
palanca de mando, y el esta'ndar de facto habfa sido la interface 
Kempston, cuyas especlficaciones ban sido adoptadas por 
muchas otras iirmas. Lam entablements son incompatibles y 
muchos juegos que son exitos de ventas funcionaran bastante 
bien con la interface Kempston, pero no lo ha ran con la Interface 
Two, por lo cual ahora Kempston ha producido una que es 
compatible con el software escrito tanto para la Interface Two 
como con el antiguo formato Kempston, Una posibfe alternative 
es comprar una interface J prog ram abfe" , que le permite al 
usuario ejecutar cuafquier software, baya sido o no disenado 
originalmente para utiiizar con palanca de mando, 
De las much as paiancas de mando que hay en el me read o, la mas 
inusual es la nueva RATde Cheetah {vease pp. 1070-1071). Esta 
no posee ningun cable que la conecte al ordenador, sino que 
utiliza un haz infrarrojo para enviar y recibir senafes. Por abora, 
solo esta a la venta para el Spectrum. El sistema Amstrad es 
tambien un tanto inusual. El micro Amstrad posee un unico 
conector para palanca de mando pero se le puede co nectar a la 
primera una segunda palanca. 

La fotografia muestra (en el sentido de las agujas del reloj): la 
palanca Amstrand, fa RAT de Cheetah, la Kempston PRO 5000 y 
la interface Kempston para el ZX Spectrum. 



Pantallas 



La mayorta de los ordenadores 
persona I es se utiiizan (al menos 
al principio) con un aparato de 
television normal como pantalla 
de visualizacidn. Ello suele 
pfantear problemas, dado que 
quiza otros miembros de la 
familia deseen mirar la television 
mientras el usuario del 
ordenador este jugando a I 
Pacmarr, de cualquier modo, la 
calidad de i mag en con 
free u en era es pobre. La solucidn 
es emplea r una pantalla, que 
proporciona una imagen de 
mejor calidad. El usuario debe 
asegurarse de que compra el 
monitor adecuado, puesto que 
hay dos estandares principles: 
el RGB y el video compuesto 
(vease p. 509). Las pan tall as de 
video com puesto se utiiizan con 
micros Atari y Commodore, 
mientras que BSC, Orlc/Atmos y 
Sinclair QL requieren el formato 
RGB, que es el que proporciona 
la mejor calidad de imagen. 
Algunos micros dependen del 
altavoz del televisor para 
producir sonido, de modo que 
los mismos requeriran pantallas 
con altavoz incorporado, Varios 
fabricantes de televisores 
producen aparatos equipados 
con interfaces para pantalla; 
estos son ideales si el usuario 
requlere a la vez tin televisor y 
una visualizacidn de gran 
calidad. Aquf vemos ef 
Microvitec Cub, 




Creacion de sonido 



Ya nos es posible crear senales sonoras a partir del convertidor de 
digital a analogico disenado anteriormente 



El proyecto 



LDX#0 2 
BUCLE1 

LDA TABLA,X 4 
STAPUERTA 4 
INX 2 
CMP#PAS0S2 
BNEBUCLE1 3 
(2 si fracas a el bucle) 



El usuario puede controlar la salida a traves de 
aurtcu lares o bien a traves de un estereo, utitizando 
el par de conectores de salida que se Italian mas 
cerca del potenciometro de la caja D A, Neoesitara, 
asimismo, haceralgunos sencilJos cables de 
conexion. Para auriculares: emplee el ertchufe 
Membra del estereo, consiga un conector en Ifnea 
adecuado y suelde los dos extremos positivos a un 
cable conectado al conector rojo de la caja D/A. 
Para un estereo; localice tas conexiones audio-IN y 
tierra y luego haga el cable. Ahora siga estos 
pasos: conecte la caja buffer y el convertidor D/A y 
enchufe la caja buffer en la puerta para el usuario; 
enchufe los cables del amplificador de los 
auriculares o del estereo en los conectores D/A; 
gireel potenciomentro del convertidor D/A 
totalmente hacia la izquierda y luego suministrele 
potencia del transformador a la caja, 




Pespues de haber seguido estos pasos, podemos 
pro bar el si sterna utilizando un corto programa en 
basic. En esencia, el sonido se genera electriea- 
mcntc proporcionandole a un micro fono un voltaje 
oscilante. Podemos generar una salida primaria de 
voltaje oscilante desde nuestro convertidor D/A 
cambiando el contenido del registro de dates de la 
puerta para el usuario de 0 a 255 y al reves en rapi- 
da sucesi6n. Entre el siguiente programa y ejecute- 
lo. Gire el potenciometro D/A en el sentido de las 
agujas del reloj hasta que se escuche sonido. 

10 REM — GENERATOR DE SONIDO BASIC CBM 
20 RDD = &B579: R EGDAT- 56577 
30 P0KERDD.255 
35 N=1 

10 POKE REGDAT. 0: FORI = 1T0N:N EXT: POKE REGDAT, 255: GOT040 

10 REM GENERAO0R DE SONIDO BASIC BBC — 
20 ROD = 4FE62;REGD AT = &f ESC 
30 9 RDD - 255 
35 N-1 

40 ?REG DAT = 0: FO R I = 1 TON : NEXT:? REGDAT = 255:GOTO40 

Observe que el programa en basic tiene una estruc- 
tura repetitiva, concentrada toda en una unica Hnea 
para conseguir la maxima veiocidad, Hay un bucle 
de demora insert ado entrc los puntos en que el re- 
gistro de datos se establcce en 255 y su estableci- 
miento en 0. El valor N de la lfnea 35 establece la 
longitud de esta demora, Pruebe de afterar el valor 



de N y ejecutar de nuevo el programa, Observara 
que la altura del tono oido baja mientras aumenta 
el valor de N. 

La mayor altura que se puede obtener mediante 
este programa en basic se producira cuando el 
bucle de demora se elimine por completo, Incluso 
un bucie ejecutado una sola vez tiene un efecto au- 
dible sobre la altura de la nota escuchada. 

Si ha experimentado con distintos valores de N 
en el programa en basic que nemos ofrecido, habra 
notado que el cambio del valor de N en I tiene un 
efecto significativo sobre la altura de la nota. El 
basic no es lo suficientemente rapido como para 
perm it linos controlar con precision la velocidad de 
oscilaei6n. Para eso debemos utilizar el lenguaje 
maquina ^ 

En el proximo capitulo de Bricolaje estudiare- 
mos el diffcil probiema de controlar altura y voiu- 
men mediante codigo maquina. Aqui nos concen- 
traremos en desarrollar un programa para producir 
distintas form as de on da. La forma de on da produ- 
cida por el programa en basic utilizado anterior- 
mente era una forma de onda cuadrada. No obstan- 
te , es posible producir otras formas de onda, que 
alteran la calidad del sonido oido. Podemos sinteti- 
zar digitalmente ondas senoidalcs y aserradas to- 
mando un cierto numero de muestras de la forma 
de onda y colocandolas en una tabla. El programa 
que se requiere en lenguaje maquina para colocar 
estas muestras una dc spues de la otra en el registro 
de datos es esencialmente muy simple. Muestra 
ilustracion muestra estas tres formas de onda, 
acompanadas de las tablas para las formas de onda 
senoidal y aserrada, Se divide en pasos el ciclo de la 
forma de onda y se muestrean estos pasos; a la iz- 
quierda detallamos el bucle del programa que en via 
estas muestras a traves de la puerta para el usuario. 

Cuando se trata de producir sonido, el tempori- 
zado es esencial. A continuation de cada instruc- 
cion esta la cantidad de ciclos de maquina requeri- 
dos para ejecutar esta instruction. A partir de esta 
formula podemos calcular el numero total de ciclos 
de maquina que lleva producir un ciclo completo de 
forma de onda: numero de ciclos de maquina 
= 2 + {4 + 4 + 2 + 2 + 3) x pasos - 1 = 1 + 15 x 
pasos. 

Si la onda se divide en 80 muestras, entonces el 
numero de ciclos de maquina requeridos para pro- 
ducir un ciclo de forma de onda es 1 201. 

Dado que en codigo 6502 cada ciclo de maquina 
torn a al rede dor de una millonesima de segundo, el 
numero total de ciclos de forma dc onda que se 
puede producir en un segundo (es decir, la frecuen- 
cia dc la nota) viene dado por este calculo: frecuen- 
cia = 1 0CXJ 000/1201 = 832 Hz. Puesto que do cen- 
tral es 512 Hz, la nota producida tendra una altura 
de unas pocas not as mas arriba de do central 

Se puede ver que el numero de pasos de muestra 
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Convertidor D/A/Bricolaje 




Tres cmdas 



AMPLITUD 
254 




TAB LA 



AND A SEND I DAL 

AMPLITUD 
254 



127 



PASOS 




(NDICE 


VALOR 


1 


127 


2 


166 


3 


202 


4 


230 


5 


248 


6 


254 


7 


248 


8 


230 


9 


202 


TAB LA 


(NDICE 


VALOR 


1 


254 


2 


241 


3 


229 


4 


216 


5 


203 


6 


191 


7 


178 


8 


165 


g 


152 



QNDA ASERRADA 

AMPLITUD 
254 Jl — 



127 



PASOS 
PROGRAMA GENERADOR 



40 ? REGDAT= 0: FORK =1 TON: 
NEXT;?RE6DAT=255: 
GOTO 40 



OHDA CU AD RAD A 



PASO 



Creaci6n de form as 

Las form as de onda senoidal y 
aserrada se crean decidiendo 
primero cu antes pases de 
mues&a tan de constituir un 
rictotefeonda_Esaasmue$tras 
de ampliiud de la onda se 
caicuian luegoyseatmacedan 
en una tabla. Los vaiorss de esia 
tab I a se pueden, entonces. 
copiar en secuencia en el 
registro de datos de la puerta 
para el usuario y, por tanto, en 
el convertidor de digital a 
analogico, donde se convierten 
en niveles devoltaje. La ventaja 
de la tabla es que permits 
realizarde antemano los 
caTculos que tanto tiempo llevan; 
la verdadera generation de la 
forma de onda, por 
consiguiente, I leva poco tiempo, 
y elio hace posibie una gama de 
free u en eras de varias octavas. 
Sin el uso de la tabla la gama se 
limitan'aados oetavas. 
La onda cuadrada se puede 
generar mediante un programa 
en basic debido a que el proceso 
es muy sencillo. La lentitud de 
este Jenguaje, sin embargo, 
limita considerablemerrte la 
gama de frecuencias 



por el cual hemos elegido dividir nuestra forma de 
onda tiene un efecto di recto sob re la frecuencia 
de la not a final. Duplicando la can ti dad de pasos de 
muestra dividiremos por la mitad la frecuencia de 
esta. Obviamente, cuantas mas muestras tomemos 
de la nota, mas probabilidades tendremos de acer- 
caruos a obtener la calidad de nota que estamos 
soitetrzanclo, pero esto siempre se debe comparar 
con la frecuencia maxima final que se puede obte- 
ner para un numero dado de pasos. 

Es probable que un cido de forma de onda no 
tenga la longitud suficiente como para ser audible, 
por lo que debemos tambien incluir codigo para re- 
petir la seccion de codigo generadora de la forma 
de onda un numero de veces establecido. La canri- 
dad de repetidones se puede determinar estable- 
ciendo un valor de contador y disminuyendolo 
hasta cero. Para obtener una amplia gama de va lo- 
res de contador, se ha utilizado un numero de 16 
bits aim ace n a do en' dos posiciones ad y ace rites, 
Ademas de este codigo, las interrupciones se desac- 
tivan al principio del programa mediante SE1 y se 
vuelven a activar mediante CL1 al final Si se pro- 
dujeran interrupciones durante ta ejecucion* ello 
restaria precision al temporizado del programa. Sin 
embargo, no es posibie desactivar todas las inte- 
rrupciones; las interrupciones no enmasc arables, si 
se producen durante la ejecucion del programa, 
pueden causa r algunos errores de temporizado. 



Los datos de la forma de onda se deben colocar 
en la memoria dentro de una tabla, con cada tipo 
de forma de onda ocupando 80 posiciones consecu- 
tivas. En la version Commodore, la tabla de la 
onda senoidal esta ubicada en la memoria a partir 
de SC000; la tabla de la onda aserrada esta en SC050 
y la tabla de la onda cuadrada empieza en SCO AO. 
El programa en lenguaje maquina esta disenado 
para recurrir por defecto a cargar datos desde la 
tabla de onda senoidal utilizando el direcciona- 
miento indexado, pero podemos pasar a otra tabla 
modmcando el programa directamente con un 
POKE desde basic. La parte LDA de LDA SINE,X esta 
en la posicion SC103. La direction de comienzo de 
la tabla dc datos a cargar tiene su byte lo en la posi- 
cion SC104 y su byte hi en la posici6n SC105. Para 
modificar la direcci6n de comienzo de los datos a 
cargar lo unico que hay que hacer es cambiar el 
numero retenido en SCI 04, Corrientemente, para 
una onda senoidal, esta posicion contendra 0; si de- 
seamos cambiar a una onda aserrada, entonces de- 
beremos cambiar el contenido de SC104 por 80. 
Cambiando el contenido de esta posicion a 160 
cambiaremos la forma de onda a una onda cua- 
drada. 

La version BBC tambien esta disenada de modo 
que las tabias empiezan al principio de una nueva 
pagina de la memoria. Por esta razon el byte hi de 
todas las direcciones de comienzo de las tabias es el 
mismo, y solo hemos de modificar el byte lo. En un 
BBC Modelo B normalmente eonflgurado en mo- 
dalidad 7, HIMEM es &7C00. Bajando tres paginas el 
tope de la memoria destinamos un espacio mas que 
suficiente para las tabias de referencia y el progra- 
ma en lenguaje maquina. 

Para el Commodore 





GENERADOR 






DE SONIDO COM 64 






PUERTA =56577 


; DIRECCION REGISTRO DATOS 




PASOS =80 


;NUMER0 DE PASOS EN ONDA 




,=|C000 






. * - RHEPARAR ZONA TAB LA DE OATOS 




SENO . = .+ STEPS 






ASERR - = *+STEPS 






CUADR - = -+5TEPS 






NUM -*-+2 






com - = -+2 






- . .PflQGRAMA PRINCIPAL. - . - 




75 


SB 




AD FD CO 


LDA SUM 




80 F2 GO 


5TAC0NT 


lESTABLECEft VALOR CONTADOR 


AD Fi CO 


LDANUW-rl 




BO F3 CO 


STACO^-rl 










A2 00 


LDX*S00 






L00P1 




BD 00 CO 


LDA SENO .X 


:T0MAR DATOS 


3D 01 CD 


STA PUERTA 


:P0NER EN PUERTA USUARIO 


ES 


INX 




FjO 50 


CPX # PASOS 




DO FS 


BNE L00P1 


flN DE UN CICL0 




;,„xDECREMENTAR CONTADOR. 




AD F2 CO 


LDACONT 




33 


SEC 




is oi 


SBC #501 




SD F2 CD 


STACONT 




AD F3 CO 


LDA C0NT+1 




E9 00 


SBC #$00 




8D F3 CO 


STACONT+1 




DO ED 


BNE L00P2 


;SI HI0¥TE>O 


A9 00 


LDA #S00 




CO F2 CO 


CMPC0NT 




00 09 


BNE L00P2 


:SI LOBYTE>0 


53 


cu 




60 


RTS 
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El codigo maquina se puede entrar en su ordenador Dora p I RRP 
cntrando el listado fuerite proporcionado y ensam- 
blandolo para crear un archivo hexa que se pueda 
cargar siempre que asi se requiera. Las tablas se 
pueden generar ejecutando el siguicnte programa: 



En el BBC, el proceso de combinar basic y codigo 
maquina es mas facil que en el caso del C64, 



900 REM"*PROGRAMALLAHADA DESONIDO GBMx„, 
910 : 

915 DN-8:REMPARAC^3ET7EDN=1 

920 lFA-0TWEN-1:LOAO"5S0UMD.HEX w h DN l 1 

999 ■ 

1000 REM- -PREPARAR VALORES DAT0S— 
1005 S=80 : REN' NUMERO DE PASQS 

1 007 TB= 1 2 *4096 : REM COM IENZ0 D E ZONA DATOS 
1005 : 

1010 REM * * 0NDA SENOIDAL ■ * 
1020 FOR l=OT0 S-1 
1030 Y=127-SJN(X)+127 
1040 POKE TB+I.Y 
1045 X=X+2/S 
1050 NEXT 1 
1060 : 

1065 REM - * » »0ND A ASERRADA- <■ » - 

1070 Y=255:TB=TB+S 

10BO F0RU0TOS-1 

1090 POKE TB+I,Y 

1100 Y=Y-25SS 

1110 NEXT! 

1120 ; 

1125 REM-< . -0NDA CUADRADA 

1130 Y=255:TB=TB+S 
1140 F0fl1=0TQS/2-1 
1150 POKE TB+1.Y 
1160 NEXT I 
1165 Y=0 

1170 FOR l=S-2 T0S-1 
1180 POKE TB+I.Y 
1190 NEXT I 

1999 " 

2000 REM— -VISUALIZAR TABLAS DATOS- - — 
2005 TB-12*4096 

2010 FGRI=TBT0TB+3*S~1 
2020 PRINTI.I-TB,PEEK{I) 
2030 NEXT 

Despues de ejecutar este programa, digite NEW y 
despues entre este programa muestra que ilustra 
como utiiizar el codigo maquina, dan do las direc- 
ciones SYS y POKE requeridas para interactuar con 
el codigo maquina desde basic. Este programa le 
pide al usuario que entre el tipo de on da requerido 
y luego produce un tono cada vez que se puis a una 
tecla* 



■ SQNIDOCBMW™ 
* PROGRAMA MUESTRA- 



10 REM - 

20 REM * 

30 : 

40 ROD =56579: POKE RDD.255: REM TOO AS SAL! DA 

65 CL= 49392 ;REM PQSICIQN BYTE LOC0NTAD0R 

67 TL=49412 :REM DIGITAR POSITION BYTE LO 

70 SON IDO= 49396 :R£M DJRECCION DE COMIENZ0 PROGRAMA 

75 REM - ESTABLECER VAL0B C0NTAD0R » 

60 NUM -80:NHI = INT{NUM^56) : NL0 = NU M - 256-NHI 

62 POKE CL.NL0:P0KECL+1,NHI 

63 : 

65 PRINTChRS(lH7J:REM B0RRAR PANTALLA 

66 INPUT'TIPO DEONDA (Q)SENOlDAL (l)ASERRADA [2)CUADRADA W ;WT 

67 POKE TL.WT'S 

68 PRINTPRINT" PULSE CJALQUIER TECLA (RUN/STOP PARA TERMINAR) " 
90 G£TA£;IF AS= " "THEN90:REM ESPERAR UNA TECLA 

100 SYSSOUNDiREM LLAMAR C00IG0 MAQUINA 
110 IFAS='T'THEN65 
120 GOTO 90 

Si no posee ensamblador o no entiende el lenguaje 
assembly aun asi puede utiiizar el programa en co- 
digo maquina digitando este cargador en basic y 
ejecutandokx En este caso, puede omitir la linea 
920 del programa que prepara la tabla. 



10 REM CARGADOR BASIC PARASONIDO CBWI 

20 REM . . ** CODIGO MAQUINA 

3D FOR 1=49396 TO 49449 

40 READ A: POKE LA 

50 CC=CC+A 

60 NEXT I 

70 B EAD OS: IF CC < >CS THEN PRINT" ER ROR SU MA CONTROL" : EN 0 
1 00 DATA1 20 , 1 73 ,240, 1 92 , 1 41 ,242 , 192 
110 0ATA173.241 r 192 ,141 ,243,192, 162,0 
120 OATA189, 0,192, 141, 1,221 ,232,224,60 
13£l DATA206, 245. 1 73 , 242, 1 92 ,56.233 , 1 

1 49 0ATA1 41 .242,1 92 , 1 73,243 , 1 92.233 . 0 

150 DATA1 41, 243. 192. 206 ,224, 169.0, 205 
160 DATA242.1 92, 206,21 7, 66,96 

170 DATA9115:REM*SUMA DECONTROL* 



5 REM ™ PROG RAMA DE SON I DO BBC 
8 MODE 7 

10 HIME=HIMEM-&0301 
20 MC%=HIMEM+1 

30 RDD-&FE62:?RD0 = 255:REM TODASSALIDA 
40 puBria=&FE60:3EM REG DATOS FUERA USUARIO 
50 pasw=60 -REM N UMER0 DE PASGS P0R ON DA 
60 oomien&jahla=MC% 
70 PROCprepararJablas 
60 PROCcodigcLmaquina 
90 PROCprofljama_mues-Ua& 
999 END 

1DD0 DEF PRQCondigDjTHquirH 
1010 : 

1020 FORopt%=1T03STEP3 
1030 P%=MC% 

1060 sero=P%: P%=P%+pasos 
1070 asefr=P%; P* 5 =P%+pasos 
1D80 cuadr=P%: P^P^-pasos 
1090 num=P%: P%=P%+2 
11130 cotfl=P%; P%=P%+2 

' 1 1 L ■ 

1120 0PTcpt% 

1130^ AQLII G0MIENZA EL PROGRAMA PRINCIPAL — 

1150 .soriido 



1160 


SEI 


1170 


LDA num 


1180 


STAcofit 


1190 


LDAfium+1 


1200 


STAoont+1 


1220 .bucl<& 




1230 


LDX#&00 


1240 .biiclel 




1250 


LDAseno.X 


1260 


STA pueita 


1270 


INX 




CPX#pasos 


1290 . 


BNEbuctel 


1310 DECREMENTAR C0NTAD0R * 


1320 \ 




1330 


LDAcortt 


1340 


SEC 


1350 


SBC #&01 


1360 


STAcont 


1370 


LDA oort+1 


1360 


SBC #&00 


1390 


STA coirt+1 


1400 


BNE bucle2 


1410 


LOA#&00 


1420 


CMP cent 


1430 


RNE bucle2 


1440 


CLI 


1450 


RTS 


1455 ] 





1460 NEXTopt% 
1480 EN0PR0C 
2000 0EF PRCQprepararjaWas 
2020 REM QNDASENQlDAL 
2025 K=0 

2030 FORI=0TOpasos-1 
2040 y-127.SIN(x}+127 
2050 ?(comienaUabia+t}=y 
2060 x=x+2*PL'pasos 
207C NEXT t 

2090 REM tt.. DNDA ASERRADA - ■ ■ 
21 00 y=255:co(n ienzoJaMa = com isnzujabla + pasos 
2110 FORI+OTOpasos-1 
21 2D ?{comieiuo_Ufcla+l)+y 
2130 y=y-255/fkasos 
2140 MEXTI 

2160 REM xx*. 0NDA CUADRADA — 
21 70 y = 255:comie*iz<Ltabla= cciTiierzo_lab3a+ pasos 
2160 FORl=0TOpasos^-1 
2190 ?(oomienzo_t2bla+1)-y 
2200 NEXT I 
2220 y=0 

2230 FORI=paso&2TOpasos-1 
2240 7(oomiwi20_tabla+l)=y 
2250 NEXT I 

2270 REM VISUALIZAR TABLAS DE DATOS x,,- 
2280 comienzo_tabla=MC% 

2290 FOR Noo mienzojabla TO comiBnzD.cabl a * 3* pass s - 
2300 PRINT1/(l-comienzo_tatEaj.?l 
2310 NEXT I 
2330 ENDPR0C 

3000 DEF PROCproflfamajriuesira 

3020 ccnt= MC% + 3 * pasos:fl£ M P0SI C ION BYTE LO C0NTAD0 R 

3030 Upo^bucle1+1:REM P0SICION BYTE L0 TIPO 

3040 valor_conta(tor=80 

3050 hLconl2!d€r= valDr^oontecfor Dl V 256 

3O60 kLC0ntector=r^]0LODnl3itorM0D 2&6 

3070 ?cort=lo_cofitador 

3O60 ctmt?1=hLc€nlador 

3090 CLS 

3100 JNPUT' TIPO DE 0NDA (0) SfNOlDAL (1) ASERRADA (2) CUADRADA*' ;onda 
3110 ?tipo-Offife«pasos 
3120 REPEAT 

3125 PR I NT' 1 PULSE CUALOU1ER TECLA (X PARA SALIRJ" 
3130 A$=GET£ 
3140 CALLsonWo 
3150 UNTIL A$- "X" 
3160 GOTO 3090 



-1 
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Manejando cif ras 

En este capftulo de nuestro curso analizaremos las facilidades que 
of rece el logo para trabajar con numeros 



Casi todas las implement aciones del logo soportan 
tanto aritmetica de enteros como de rcales (deci- 
mates), utilizando los operadores infijos H — * /. 
Estos operadores se denominan infijos porque se 
escriben entre los numeros con los cuales trabajan; 
por ejemplo, 3+4. Algunas versiones de logo in- 
cluyen tambien aritmetica de "prefljos", segun la 
cual nuestro ejemplo se escribiria SUM 3 4. Una 
ventaja de esta notacion es que cs coherente con la 
forma en que se escriben las otras operaciones e 
instrucciones del logo, * 

El logo MIT solo soporta aritmetica de infijos, 
pero es sencillo programar formas con prefijos si asf 
se requiere. Defina SUMA y PRODUCTO y pmebelos: 

TO SUMA :A :B 

OUTPUT :A + :B 
END 

TO PRODUCTO ;A :B 

OUTPUT :A * :B 
END 

La "precedencia" de operaciones (el orden por el 
cual se llevan a cabo) sigue las reglas matematicas 
habituales. Todo lo que este entre parentesis se 
realiza primero, seguido de multiplicaciones y divi- 
siones, y finalmente sumas y restas: 

PRINT (3 + 4) * 5 
PRINT 3 + 4*5 

Ahora pruebe las formas de prefijo: 

PRINT PRODUCTO 5 SUMA 3 4 
PRIST SUMA 3 PRODUCTO 4 5 

Esto demuestra otra ventaja de las formas de pre- 
fijo: no existe necesidad alguna de reglas de prece- 
dencia y la linea se evalua de la misma manera que 
cualquier otra Imea de imtracciones del logo. 

La habitual operation de la division \ ) da el re- 
sultado como un numero real. Otras dos operacio- 
nes, QUOTIENT (cociente) y REMAINDER (resto), 
suelen ser utiles para trabajar con enteros. 

QUOTIENT 47 5 es 9 
REMAINDER 47 5 es 2 

Un m£todo estandar para convertir un numero en 
base 10 a binario es ir dividiendo e! numero por dos 
hast a que el result ado sea cero. El numero binario 
resultante se halla escribiendo los r estos de cada 
etapa por orden inverso, Por ejemplo, para conver- 
tir 12 a binario: 

12/2 = 6;resto = 0 

6/2 = 3;resto = 0 

3/2 - 1;resto = 1 

1/2 = 0;resto = 1 

De este modo, leyendo los restos hacia arriba, ha- 
llamos que el decimal 12 es 1100 en binario. 



Utilizando QUOTIENT y REMAINDER podemos im- 
plementar esta tecnica en logo facilmente. Colo- 
cando la sentencia de impresion despues de la 11a- 
mada recursiva obtenemos los restos impresos en el 
orden correcto (inverso), 

TO BIN :X 

IF:X-0 THEN STOP 

BIN QUOTIENT :X 2 

PRINT1 REMAINDER :X 2 
END 

Existen dos operaciones para redondear numeros: 
INTEGER y ROUND. INTEGER produce la parte entera 
de un numero, simplemente ignorando cualquier 
cifra que haya despues del punto decimal, y ROUND 
redondea un numero aumentandolo o disminuyen- 
dolo hasta el numero enter o mas cercano. 

Los siguientes procedimientos calculan cl interes 
compuesto sobre una inversion a un porcentaje 
dado de interes. En IMPRESION.EXCELENTE, INTE- 
GER se utiliza para obtener las pesetas, y ROUND, 
para redondear los centimes al numero entero mas 
cercano, 

TO COMPUESTO :PRINClPAL :PRCNT iANOS 
IF :AN0S=0 THEN IMPRESION. EXCELENTE 
:PRINCIPAL STOP 

COMPUESTO :PRINCIPAI_*(1+ ;PRCNT/100) 
:PRCNT :AN0S - 1 

END 

TO IMPRESION. EXCELENTE :DfNER0 
MAKE" PESETAS INTEGER :DINER0 
MAKE"CENTIM0S ROUND (:DINERQ - 

:PESETAS)*100 
(PRINT [PESETAS" PESETAS :CENTIM0S 

JE CENTIM0S) 

END 



Hora de probar 



Aiiteriormente ya hemos utilizado =, < y > como 
operadores logicos en comparadones en numero- 
sos prcrediririentos, Se pueden emplear las opera- 
ciones logicas ALLOF, ANYOF y NOT para combinar 
otras condiciones. ALLOF es verdadera si sus dos en- 
tradas son verdaderas, ANYOF es verdadera si algu- 
na de sus entradas es verdadera, y NOT es verdade- 
ra si su entrada es falsa. De mo do que tenemos: 

IF ANYOF :X > 0 :X=0 THEN PRINT" POSITIVO 
IF NOT :X < 0 THEN PRINT Ji P0S!TIVO 
IF ALLOF :X > 0 :X <100 THEN PRINT 
[ENTRE 0 Y 100] 

La operacion NUMBER? produce TRUE (verdadero) 
si la entrada es un numero, de lo contrario devuelve 
FALSE (falso). La utilizamos en el procedimiento 
PRIM0?, que produce TRUE si su entrada es un nu- 
mero primo, o, de lo contrario, FALSE. Empieza 
por verificar que la entrada sea realmente un nume- 



F1GURAS USSWOUS 





ro y que sea mayor que dos. PRUEBA.PRIMO verifica 
entonces si hay algun entero entre la raiz cuadrada 
del niimero y dos que sea dnisible por el mismo, 
sin que quede -'-gni resto. 

TO PRUKPiMJM 
IF NOT NUMBER? JWM THEN PRINT [NO ES 

UMNUMEFtO] STOP 
B= MM < 2 THEN OUTPUT" FALSE 
OUTPUT PRUEBA.PRIMO ;NUM INTEGER SQRT 
MAI 

EM 

TO PRUEBi PRIMO ;NUM :HECH0 
IF :HECH0=1 THEN OUTPUTTRUE 
: REMAINDER :NUM :HECHO)=0 THEN OUTPUT 
FALSE 

OUTPUT PRUEBA.PRIMO :NUM :HECH0 - 1 
END 



Caminando 
sobre la linea 



recomdo del 
jEa que al cabo 
if&ccfones 
oiias> fa 
e ladistancia 
cto a! punto 
or a fa raiz 
)s es mayor 
prediction 
en una gran 
el logo le 
xs d cad de p rob aria: 
VJACHO :NUMPAS0S; 

*EAT :NUM PASOS [RT 
eOM361)F0 





:: i: 
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Numeros aleatorios 

RANDOM n produce un entero al azar cntre 0 y n-1 . 
El procedimiento BORRACHA hacc que la tortuga 
trastabillee a traves de la pantalla, girando en un 
angulo al azar a cada paso. La entrada A da el tama- 
no maximo del giro que se puede describir en cual- 
quier momenta. Si ejeeuta este procedimiento 
comprobara que la tortuga gira en circulos impreci- 
sos, moviendose hacia la izquierda o la derecha 
segun el valor que se le haya asignado a A + 

TO BORRACHA :A 
FORWARD 1 

RIGHT (-:A/2+ RANDOM :A) 
BORRACHA ;A 
END 

El Uamado metodo Monte Carlo es una tecoica para 
resolve r problemas matematicos mediante el em- 
pleo dc numeros aleatorios, 



EM 




RECORFJDODU BORRAGHQ 




"PI" LLEG A A MONTE CARLO 



En nuestra demostracion hallaremos una aproxi- 
macion a pi empleando este metodo. La ilustracion 
muestra un cuarto de circulo dibujado dentro de un 
cuadrado. La superficie del cuadrado es de 100 x 
100 unidades cuadradas, y la superficie del cuarto 
de circulo es (1 ~ 4) x pi x 100 x 100 unidades 
cuadradas, La raz6n de las superficies circulo 4- 
cuadrado es igual a pi 4. Ahora clave un alfiler al 
azar sobre el cuadrado 1 000 veces y cuente cuantas 
veces el alfiler ha caido dentro def cuarto de circu- 
lo; a este numcro llameio IN. El valor de IN/1000 
debe ser aproximadamente el mismo que ef resulta- 
do de: circulo *f cuadrado, es derir, pi 4, De 
modo que si hacemos el experitnento, multiplica- 
mos IN por cuatro y dividimos por 1 000, cl resulta- 
do deberia ser una aproximacion a pi. Eso cs preci- 
samente lo que hacen los siguientes procedi- 
mientos: 

TO MC 
DRAW 
PU 

MAKE"IN 0 

MCI 1000 100 100 

(PRINT [EL VALOR DE PI ES]0,004*{:IN)} 
END 

TO MC1 :NUM :XNUM :YNUM 

IF :NUM = 0 THEN STOP 

PUNT0.ALEAT0RI0 :XNUM ;YNUM 

IF DENTRO? THEN MAKE "IN :IN + 1 

MC1 :NUM-1 :XNUM :YNUM 
END 

El procedimiento MC simplemente establece las 
condiciones, llama a MC1 e imprime los resultados. 
MC1 realiza la mayor parte del trabajo, llama a 
PUNTO. ALEAT0RI0 'para posicionar la tortuga y 
lucgo iocrementa IN si el punto esta dentro del cir- 
culo. Esto continua hast a. que el procedimiento se 
haya llevado a cabo la cantidad correct a de veces, 

TO PUNTO. ALEAT0RI0 :XNUM :YNUM 

SETXY RANDOM :XNUM RANDOM ;YNUM 
END 

TO DENTRO? 

IF{XC0R*XC0R+YCOR*YCOR) < 10000 
THEN OUTPUT "TRUE 

OUTPUT "FALSE 
END 

PUNTO. ALEATORI0 coloca a la tortuga dentro del 
cuadrado cn una position al azar, mientras que 
DENTRO? verifica si la tortuga esta dentro del circu- 
lo, Ejecutar esto llevara bast ante tiempo, pero fi- 
nalmente se obtendra un valor para pi de 3,15999. 

Las curvas Lissajous son una intercsante familia 
de curvas en las cuales la coordenada x de cad a 
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pun to esta determinada por la funcion seno y la 
co'ordenada y par la funcion coseno: 



TO LJ :C0EF1 :C0EF2 :PAS0 

DRAW PU HT 

POS :C0EF1 :C0EF2 0 PD 

U1 :C0EF1 :C0EF2 0 :PAS0 
END 

TO POS :C0EF1 :C0EF2 :ANGUL0 
MAKE "X 100'SIN (:C0EF1* rANGULO) 
MAKE "Y 100*C0S (:C0EF2* :ANGUL0) 
SETXY :X :Y 

END 

TO LJ1 :C0EF1 :C0EF2 :ANGUL0 :PAS0 

POS :C0EF1 ;C0EF2 :ANGUL0 

U1 :C0EF1 :C0EF2 (:AMGUL0 + :PAS0) :PAS0 
END 



Complementos al LOGO 

Las versiones LCSI incluyen aritmetica de prefijo. 
El logo Atari posee SUM y PRODUCT; el logo 
Spectrum posee tambien DIV, y el logo Apple tiene 
QUOTIENT, que corresponden ambas a QUOTIENT 
del logo MIT. 

Se utiliza INT en lugarde INTEGER. 

En vez de NUMBER? se emplea NUMBERP. 

Los operadores logicos poseen los no mores mas 

usuales de AND. OR y NOT. 

IF tiene una sintaxis distinta: en lugarde PRINT1 se 

utiliza IF :X = 0 PRINT "TIPO CERO. 

En lugar de SETXY se utiliza SETPOS (seguido de 

una lista). Utilice CS en lugar de DRAW. 



MIRAR 
END 

TO VERIFICAR 

IF COND OVER :0VEJA1 :CERCA [ASK 

:0VEJA1 [BK10RT90]] 
IF COND OVER :0VEJA2:CERCA [ASK 

:OVEJA2[BK10RT90]] 
IF COND TOUCHING ;OVEJA1 :OVEJA2 
[CHOQUE] 

IF COND TOUCHING :PERR0 :OVEJA1 [ASK 

;0VEJA1 [RT90]] 
IF COND TOUCHING :PERR0 :OVEJA2 [ASK 

:OVEJA2 [RT90]] 
ESTABLECER.VELOCIDADES 
END 

TO MOVER :COM 

W [ASK :PERRO [SETH OJ] 



ASK :PERRO [SETH 90]] 
ASK :PERRO [SETH 180]] 
ASK :PERRO [SETH 270]] 
'ASK :T0RTUGA [DIBUJAR. 



IF:C0M 
IF:COM = "S 
IF :COM = "Z 
IF :COM = "A 
IF:COM = "Q 
CAJA]] 
END 

TO TECLALflDA 

IFKEYP [OUTPUT RC] 

OUTPUT" 
END 

2, El juego de los meteorites: defina forma 1 como 
un meteorito y forma 2 como la nave espacial. 
TO J U GAR 



Ejercicios de logo 

1 . Escriba un procedimiento para producir la 
enesima potencia de un numero, de modo que 
POTENCIA4 2produzca16. 

2. Escriba un conjunto de procedimientos para 
convertir un numero decimal a hexadecimal. 

3. Escriba un procedimiento PAR? que produzca 
TRUE si un numero es par y FALSE si no lo es. 

4. Utilice el metodo Monte Carlo para hallar la 
superficie existente bajo la curva y^x 2 entre x=0 y 
x=10. 



CS FS 
EST 01 
EST 1 1 
EST 21 
EST 3 2 



Respuestas a los ejercicios 

1 . Juego de conversion para utilizar control por 

teclado: 

Cambie ESTABLECER.DIABLOS 

MIRAR, VERIFICAR. Elimine ENCPAL Agregue 

MOVER yTECLALEIDA. 
TO ESTABLECER.DIABLOS 
WHEN OVER:OVEJA1 ;CERCA [SETSPO] 
WHEN OVER :0VEJA2 :CERCA [SETSP 0] 
WHEN TOUCHING :0VEJA1 :OVEJA2 [SETSP 0] 
WHEN TOUCHING :PERR0 :0VEJA1 [SETSP 0 
WHEN TOUCHING :PERR0 :OVEJA2 [SETSP 0 
END 

TO MIRAR 
MOVER TECLALEIDA 
IF :VELOCIDAD = 0 [VERIFICAR] 



- 100 80] 180 199 
0 80] 180199 
100 90] 180 199 
0 - 80] 90 50 
ESTABLECER.DIABLOS 
MOVER.AZAR 0 
END 

TO EST :NUM :FORMA :POS :CABEZA :VEL 

TELL :NUM SETSH :FORMA 

PU SETPOS: POS 

SETH :CABEZA ST SETSP :VEL 
END 

TO ESTABLECER.DIABLOS 

WHEN TOUCHING 0 3 [BANG] 

WHEN TOUCHING 1 3 [BANG] 

WHEN TOUCHING 2 3 [BANG] 

WHEN 15 [ENCPAL] 
END 

TO BANG 

TELL [01 2 3] 

SETSP OSS 

PRINT "PRINT" 

PRINT "SALPICADO 
END 

TO ENCPAL 

IF(JOY 1) < 0 [STOP] 

ASK 3 [SETH 45* JOY 1] 
END 

TO MOVER.AZAR :NUM 

IF SPEED = 0 [(PRINT "MAR CAD OR :NUM) 
STOP] 

ASK RANDOM 3 [SETH 145 + RANDOM 70] 
MOVER.AZAR :NUM+1 
END 



Lenguaje maquina/Codigo del 6809 




RETURN: 
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MANTBtlMJEHTO 

El diseho importa 

Resuftan diifciJes de observar 
las reglas de una buena 
estructura cuando se programa 
en lenguaje maquina. Pero no es 
d if Toil crear tin pnoQrarna segun 
las regJas de un buen diseno, 
ademas de ser un instrument 
excelente de claridad y de ahorro 
de tiempo en la depuration 



Saber disenar 
el programa 



Hasta ahora nos hemos limitado a construir rutinas sencillas. Es el 
momento de abordar tareas mas ambiciosas, como la 
estructuracion de programas en assembly 



Mucho llcvamos cscrito sobre las ventajas de un 
adccuado diseno de los programas, la construccion 
por modulos y la programacion estructurada en el 
contexto de los lenguajes de alto nivel* Pero tanto 
las dificultades como las ventajas se encuentran 
agrandadas en los de bajo nivcl. No existen en as- 
sembly estructuras apropiadas de control como las 
hay en basic (p. ej„ WHILE. ..WEND, IF.. .THEN., .EL- 
SE) que le proporcionen algun tipo de estructura al 
codigo. Tampoco se dispone de notariones adecua- 
das, diversos tipos de variables, y ni siquiera se 
puede pedir a un programa en assembly que no sea 
seis o diez veces mayor, en numero de instruccio- 
nes ? que el mismo programa escrito en un lenguaje 
de alto nivel. Y encima, es mucho mas facil que se 
cometan errores de consecuencias desastrosas, 
tales como borrar todos los datos introducidos en 
un disco por culpa de un mmimo error existente en 
un solo byte. Con el fin de que la programacion en 
assembly resulte menos aventurada, vamos a expo- 
ner un metodo para abordarla. 

No hay nada absolutamente nuevo en la progra- 
macion estructurada o ingenieria de software: un 
program ador experimentado sabe sencillamente 
que tener el problema totalmente especificado y la 
claridad en el analisis constituyen la base ineludible 
de un estilo de programacion con exito, Nada mas 
ilustrativo para probar esto que tratar de descubrir 
errores en un programa escrito en lenguaje maqui- 
na por us ted de una manera poco estructurada e 
indocumentada y que dejo en algun sitio hace algu- 
nos meses* Un buen diseno y unos adecuados me- 
todos de trabajo garantizan por si solos un buen 
programa. 

Fases en el diseno del 
programa 

• Especificar el problema. En esta fase, el progra- 
mador debe cuidar sobre todo de especificar cuales 
son las entradas y cuales las salidas. A menudo los 
dispositivos perif£ricos son control ados directa- 
mente (en especial, el teclado y la pantaila), por lo 
que se han de tener en cuenta las sen ales utilizadas. 
Puede que tambien existan limitaciones de tiempo. 
Puede que usted carezca de rutinas apropiadas para 
convertir una cadena de bytes que entra o sale en la 
forma cn que el programa lee los datos (p. ej., la 
conversion de una cadena de caracteres ASCII en 
un numero decimal en formato binario). Es, pues, 
importante especificar no solo el formato en que 



surge el dato sino tambien el que sera exigido por el 
resto del programa. 

• Diseno del programa. Se trata ahora de idear los 
procesos por los que la entrada especificada alcanza 
la salida o resultado deseado. Tales procesos han 
de agruparse por modulos en la medida de lo posi- 
ble, autosuficientes desde un punto de vista logico, 
junto con los datos que cada proceso necesita. Hay 
dos tecnicas prineipales para "cortar" un programa 
en modulos: 1) La tecnica bottom-up (de abajo arri- 
ba), en la que se hace una recolecci6n de modulos 
que pueden resultar utiles en el contexto del pro- 
grama para despues ajustarlos; 2) La tecnica del 
top-down (de arriba abajo), en la que se va des- 
componiendo sucesivamente el programa en unida- 
des cada vez mas pequenas, interesandonos antes 
en la funcion a desempenar que en como lograrla, 
hasta el punto en que el proceso no puede seguir 
mas adelante, Solo en ese momento se comienza a 
pensar en el modo de codificar cada mridulo. 

El diseno bottom-up ofrece la ventaja de emplear 
mddulos de libreria, faciles de conjuntar y cuyo re- 
sultado suele ser un uso mas eficaz de la memoria. 
La des ventaja esta en que el programa en su to tali- 
dad puede resultar dificil de depurar y comprobar, 
as i como puede que no sea tan comprensible. El 
diseno top-down proporciona programas mejor es- 
tructurados, y cada fase del proceso puede ser com- 
probada por separado por medio de "colUlas" 
(stubs), breves rutinas que reemplazan los mddulos 
to da via por escribir limit andose a aceptar entradas 
y proporcionando una salida correcta sin realizar 
proceso alguno. La desventaja se halla en que los 
programas probablemente ocuparan much a mas 
memoria y dificilmente las rutinas ere ad as podran 
tener un uso inmediato en otro lugar. 

Dentro de cada modulo se especificaran los datos 
que se necesitan, sus estructuras y algoritmos. En 
este nivel resulta util un diagram a de flu jo para re- 
presentar los algoritmos, pero hay qulenes prefie- 
ren, por mas sencillo, trabajar iibremente con un 
lenguaje de alto nivel Ham ado seudocodigo. La 
base de este seudocodigo suele ser el pascal, pero 
no hay razon alguna para prescindir del basic. Este 
nos permite disenar algoritmos y datos de una ma- 
nera que nos es familiar, y reiega el trabajo de bajo 
nivel a las tareas mas sencillas de traducir a assem- 
bly los algoritmos en seudocodigo. Lo cual es 
mucho mas facil que intentar disenar y codificar en 
assembly al mismo tiempo, 

• Codificacion. Si las rutinas fueron correctamente 
disenadas, esta sera sin duda la fase mas sencilla y 
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Codigo del 6809/Lenguaje maquina 



breve de todas. Para traducir un algoritmo en alto 
nivel a codigo en bajo nivel es esenciai que se tras- 
laden al bajo nivel las estmcturas de control em- 
pleadas en alto nivel, desechando la tentacion de 
emplear BRA y JMP indiscriminadamente. Recuer- 
de que el tiempo que ahorra escribiendo codigo no 
estructurado se va a derrochar en una siguiente fase 
de depuration con sus frustrantes procesos de "en- 
sayo y error". 

En ei diagrama de esta pagina proporcionamos 
algunos ejemplos de como pueden codificarse las 
mas comunes estmcturas de control, suponiendo, 
para mayor simplicidad. que los items de datos em- 
pleados son de ocho bits. 

El problema de una codification de este tipo de 
las estructuras de control es que ei program a puede 
alargarse mas de lo previsto, Esto es irrelevante si 
no se tiene limitation de memoria; una codificacion 
mas breve no siempre significa menor tiempo de 
ejecucidn, si no un desarrollo mas lento y mucho 
tiempo invertido en la depuraci6n. Pero si el cspa- 
cio esta limitado, es mejor escribir en una forma 
estructurada espaciosa e intercalar una fase de opti- 
mization en la que la codificacion operativa puede 
abreviarse teniendo en cuenta situaciones particula- 
res y respetando en lo posible la estructura esen- 
ciai. 

• Depuracidn. En esta fase se probara cada modu- 
lo por separado (empleando stubs donde sea nece- 
sario) para asegurarse que proporciona las salidas 
adecuadas a las entradas validas. La depuracion de 
programas en assembly dista mucho de parecerse a 
la del basic. Para poder observar lo que esta suce- 
diendo, es necesario inspeccionar el contenido de 
los registros y de las posiciones de memoria em- 
pleadas por el prog ram a, y cambiarlo si llega el 
caso, Es casi imposible depurar un programa as- 
sembly sin la ayuda de una utilidad que permita 
poner y sacar puntos de ruptura (breakpoints). 
Estos puntos permiten ejecutar un programa hasta 
dicha ruptura, vol car los registros e inspeccionar y 
cambiar los contenidos de la memoria. 

• Comprobacidn. Una vez comprobado cada m6- 
dulo. hay que acoplar el programa entero y probar- 
lo con datos apropiados* Esto es todavia mas facil 
cuando se sabe que cada una de las partes funciona 
correctamente. 

• Documentation. Es imponante, dado que los 
programas en assembly son mas dificiles de com- 
prender que los escritos en lenguajes de alio nivel. 
Es impreseindible, en concreto. documentar ei uso 
de la memoria, de la pila (sobre todo al pasar para- 
metros) y de los registros dentro de las subniruias. 

• Mantenimiento. Si un programa va a ser utiliza- 
do despu6s de un buen periodo de tiempo, de segu- 
ro necesitara alguna revisi6n, ya sea para enmendar 
errores, ya sea para hacer alguna que otra mejora, 
Aqui, en esta fase, es donde se valora el tiempo 
invertido en un diseho cuidadoso y en una buena 
documentation. Si el programa se diseno y/o se do- 
cumento pobremente, sera mejor que lo vuelva a 
escribir por completo y no intent ar cambios. 

Necesi tamos ahora un proyecto para aplicar est as 
habilidades. Nada mas apropiado, para nuestra pri- 
mera aventura en assembly estructurado, que un 
monitor/depurador en c6digo maquina. Si ya ha 
us ado un ensamblador, le resultara familiar el tipo 



de utilidades que se esperan de un monitor/depura- 
dor. En esencia, proporcionara al programador el 
tipo de facilidades de edition que el programador 
en basic da por supuestas; es decir, la posibilidad 
de inspeccionar y cambiar los contenidos de la me- 
moria. 

En el proximo capitulo de este curso de lenguaje 
maquina trataremos este proyecto y recorreremos, 
desde la fase de diseno, todas las etapas descritas 
anteriormente, con fa finalidad de crear una ayuda 
de programaci6n importante y que le sea de auten- 
tica utilidad. 



Columns vertebral 

No existen estructuras de 
control escritas en assembly, 
por eso puede ser util imitar los 
mttodos comprobados en 
lenguajes de alto nivel. Las 
estmcturas que aqui mostramos 
son claras y elegantes en ambos 
lenguajes, de bajo y alto nivel y 
se emplearan para excluir 
cualquier otra alternativa 



Estructuras de control 




Seudocddigo 


Lenguaje assembly 


Estructura 

IF... THEN... ELSE 


IFNUM1 = 3 

THEN 

rutinal 

ELSE 

rutina2 
ENDIF 


TRES FCB3 

IF LDANUM1 
CMPATRES 
BNE ELSE 

THEN 


*rutina1 

BRA FINIF 

ELSE 

*rutina2 

FINIF 




Estructura 
WHILE.. .WEND 


Seudocodigo 


Lenguaje assembly 


WHILE NUM1 <=3 
rutina a repetir 
WEND 


WHILE LDANUM1 
CMPATRES 
BGT FINWHILE 

* rutina a repetir 
BRA WHILE 

FINWHILE 




Estructura 
REPEAT.. .UNTIL 


Seudocddigo 


Lenguaje assembly 


REPEAT 
rutina a repetir 
UNTIL NUM1 <3 


REPEAT. 


"rutina a repetir 
LDA NUM1 
CMPATRES 
BGE REPEAT 

UNTIL 






Estructura 
FOR... NEXT 


Seudocodigo 


Lenguaje assembly 


F0RNUM1 = 1T0NUM2 
rutina a repetir 
NEXT NUM1 


LDANUM2 
FOR 


*rutina a repetir 

DECA 

BGT FOR 
NEXT 
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ioftware/Deus ex i 



El efecto del defecto 

Deus ex machina" es un original juego que le permite al usuario 
asumir el papel de protagonista de una "fantasia televisiva 
totalmente animada" 



olio del juego 

Devsex machina es para jugar 

• . :ra contemplarlocomo 
- - t artretanimiento. 
aamplia variedad de 
:cnes. si bien algunas 
; r . :arec % entre si 
_j£ ^l,t. ^ 't : ^ e r: d as p ara 

"IT:::- 57 ~: ; = ; 3 mo 
pMcstijeen ei angulo inferior 
= : st luyendo 



Dado que los juegos por ordenador se han conver- 
tido en una parte importantisima de la industria del 
ocio. quiza era inevitable que las firmas de software 
atmaran sus esfuerzos con otros sectores del nego- 
cio del entretenimiento. Automata Software, em- 
presa conocida por su serie de juegos de Piman, ha 
dado los prirneros pasos en este camino desarro- 
llando un producto que no solo contiene software 
para ordenadores sino tambien una cassette de 
audio que se puede sincronizar con el programa 
para ordenador para proporcionarie al juego una 
banda sonora. 

La idea sobre la que se sustenta Deus ex machi- 
na, cuyo desarrollo consumio seis ineses y su pro- 
gramacion otros tres, es que un ordenador omnipo- 
tente del futuro se rebela y ayuda a crear un "defec- 
to" humano, un ser imperfecto. El jugador, como 
ser imperfecto, pasa a traves de diversas etapas a lo 
largo del juego, que describen experiencias que 
abarcan desde la infancia hasta la vejez. La partici- 
pation directa del jugador comienza en la concep- 
cion, guiando al espermatozoide hacia el ovulo. A 
medida que el nifio va creciendo, esta sujeto al ata- 
que constante de la "polida del defecto". Esta en 
manos del jugador desviar estos ataques, utilizando 
ya sea el teclado o ta palanca de mando. Se con si - 
guen puntos manteniendo el "porcentaje de enti- 
dad ideal", que empieza con un 99 % y va dismi- 
nuyendo en funcion de los asaltos de la policia del 
defecto. Cuando el ser imperfecto alcanza la edad 
adult a, la naturaleza de esos ataques cambia y el 
jugador se debe adaptar a ellos. 

Despues de cargado el juego, se debe sincronizar 
la banda sonora con el programa. Al hacerlo se 
debe tener mucho cuidado, porque las distintas 
pantallas estan cronometradas como para coincidir 
exactamente con las palabras y la musica, y esto 
contribuye enormemente al entretenimiento que 
proportion a el paquete. 



tanque de interrogation 




El programa se divide en dos segmentos, una 
mitad en cada lado de la cassette, que representan 
un total de 96 K de codigo. Al final del lado 1, 
despues de una escena amorosa en la que el juga- 
dor debe desplazar ei cursor por su cuerpo para re- 
cibir los besos que van flotando hacia el, se debe 
cargar el lado 2. No se debe apagar el ordenador y, 
nuevamente, debe ponerse atencion en sincronizar 
la banda de sonido correctamente. La implicaci6n 
del jugador en la segunda mitad consiste funda- 
mentalmente en ir saltando obstaculos antes de lie- 
gar a la "vejez". En este punto aparecen en la pan- 
talia grandes coagulos de sangre, que el jugador 
debe disolver. Al concluir el juego, independiente- 
mente del marcador, el ser imperfecto muere, 

Deus ex machina es inusual por cl hecho de que 
no hay ningun marcador ganador y, en realidad, el 
jugador ni siquiera necesita participar para nada en 
el juego. Los acontecimientos se suceden de la 
misma forma sin ninguna participation, de modo 
que el jugador tiene la option de involucrarse en el 
desarrollo del juego o bien mirarlo como una fuen- 
te de entretenimiento. Los graficos son excelentes e 
imaginativos. A pesar de que no hay ninguna pan- 
tall a que corte el aliento, si reflejan todas el cuida- 
do y la atencion que se le dedicaron a todos los 
detalles de! paquete en su conjunto. 

La musica de la banda sonora la escribio y la di ri- 
gid totalmente el cofundador de Automata, Mel 
Croucher, quien tambien escribio el guion. Las 
canciones son agradables. sin llegar a ser excepcio- 
nales. El mejor numero es el que acompana a la 
escena en el coal el ser imperfecto cobra vida, y lo 
interpreta Ian Dury* 

El guion y la banda sonora son muy diferentes a 
los de la mayorfa de los juegos por ordenador y 
reflejan la filosofia de no violencia a la que respon- 
ded todos los juegos de Automata. Los usuarios 
que disfruten destruyendo hordas freneticas de ex- 
traterrestres atacantes probablemente quedaran 
decepcionados, y a much as person as el content do 
semimistico de las letras de las canciones les resul- 
tara molesto. Sin embargo, se debe aplaudir de 
todo corazon a Automata por su innovadora idea. 
El programa es un valiente expert men to y sin nin- 
guna duda sera considerado como un paso impor- 
tante en el desarrollo del ocio informatizado, 



Deus ex machina: Para el Spectrum de 48 K 
Editado por: Automata Ltd, 27 Highland Road, 
Portsmouth, Hants, PQ49DA, Gran Bretaha 
Autor es: Mel Croucher, Andrew Stagg 
Palanca de mando: 0 pcional 
Formate: Cassette 
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Vision del robot/Aplicaciones 



Los ojos del robot 



Examinemos los problemas que implica preparar un robot para 
«ver» los objetos del mundo exterior 
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De todos )os sentidos, tal vez el mas importante sea 
el de la vista. Las per cepci ones visuales son tan im- 
portantes para nuestra comprension del mundo, 
que con frccuencia se utiliza la frase 4£ es como tra- 
tar de describirle el color a un ciego" para ilustrar 
las dificultades que entrana explicar a alguien algo 
sobre lo que no tiene absolutamenie ningun conoci- 
mien to. Sin la vista, nuestro conocimiento del 
mundo se ve seriamente restringido \\ del mismo 
modo, un robot que no posea aparato visual esta 
isualmente en situation de desventaja. Ya hemos 
\isto como los robots utilizan sensores para detec- 
tar la presencia de un objeto en su camino: ahora 
deseamos desanollar un sistema que los dote de un 
equipo visual tan eficaz como el del hombre. 

El ser humano posee un iris que aetua a modo de 
lente, controlando la cantidad de luz que penetra 
en el interior del ojo, y una retina en la cual la lente 
focaliza la imagen, Pero el hecho es que el ojo en 
re alidad no u ve" nada en absoluto; es solo un trans- 
duct or que convierte una serial en otra forma mas 
aceptable. La verdadera tare a de ver la lleva a cabo 
el cerebro sobre la base de las senales que recibe 
desde sus sensores, 

De modo que el tenia de la vista del robot lo 
podemos dividir en dos partes claramente diferen- 
ciadas. La primera implica la construecidn de un 
"ojo" adecuado que actue como sensor para el sis- 
tema visual del robot; la segunda parte es el proce- 
samiento de ordenador que se debe realizar antes 
de que el robot pueda darles algun significado a las 
senales provenientes de su sensor. 

Construir un ojo robot no es demasiado dificil. 
En su nivel mas simple, una celula fotoelectrica 
puede actuar como una forma sen cilia de ojo. Esta 
puede dar una serial que correspond a a la ilumina- 



ci6n global del campo de vision; como ya hemos 
visto, esto puede ser titil si deseamos simplemente 
que nuestro robot "se dirija" hacia una luz brillante 
o siga una linea blanca pintada sobre un fondo os- 
curo. El programs para emplear esta cntrada sen- 
sorial puede, asimismo, ser simple, dado que la in- 
formation recibida es limitada y que la cantidad de 
acciones que el robot puede emprender como con- 
secuencia de dichas senales simples es proporcio- 
nalmente r estrin gida * 

Pero a esto apenas si podemos denominarlo 
"vista", en la acepcion literal del tcrmino. Espetifi- 
camente, necesitamos un sistema visual que pueda 
construir una imagen bidimensional completa del 
mundo. permitiendo que el "cerebro 1 ' del robot 
examine exaetamente la misma information que 
process el cerebro humano. 

Una respuesta a este problem a utiliza una unica 
celula fotoelectrica con una lente colocada frente a 
ella. Esta explora la zona de la imagen por del ante 
del robot, barriendo mecanieamente todo el campo 
de vision hasta construir una imagen completa; 
esta, cntonces, se puede almacenar en la memoria 
del ordenador. En la practica, lamentablemente, 
este metodo es lento y poco fiable* 

En la mayoria de los easos, sin embargo, el ojo 
robot se compone de algun tipo de camara de 
video. Esta camara puede ser del tipo estandar que 
se utiliza para las transmisiones de television, o 
puede ser un dispositivo especializado discnado es- 
peciflcamente para la vision robotica, Algunos apa- 
ratos de esta ultima clase emplean chips especiales 
denominados RAM opticas; estos se componen de 
memoria RAM en la que el valor de cada byte se 
establece automat icamente en funeion de la canti- 
dad de luz que cae sobre ese byte determinado. 



La vista del robot 
y!a vista del ftomtare 

La naturaleza de la capacidad 
humana de ver se basa en gran 
medida en la interaccitfn entre 
jn complejo sistema de nervios 
y receptores> todos ellos 
procesades por el cerebro. Si 
bien una imagen visual se 
compone da patron es de luz y 
oscuridad ma read os en la retina, 
el verdadero acto de "ver 11 tiene 
lugar en el cerebro. El cerebro 
deun robot procesa, asimismo, 
una imagen de patrones de luz y 
oscuridad, pero posee un grado 
de precision muy inferior 
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Lo que uno cree que ve 



A 



^Cual es mas farga? La ilusion 
. de MuJFer-Lyer hace que uno 
crea que la ffnea vertical de fa 
figura de [a izquierda es mas 
largaque Ja linea vertical de fa 
de fa derecha. En realitfad, las 
dos tienen fa mis ma longitud 




En laifusfdnde la via, labarra 
horizontal superior parece 
ser mas large, 

independientemente de como 
semire la figura. En realidad, 
las dos oarras horizontals 
son de igual longitud 




Una figura "imposible". que 
mezcla en dos dimensiones 
formas de apariencia valida. 
La fnvestigacion demuestra 
que los humanos son 
in cap aces de reconocer esto 
como un objeto 



Apesardequelaslmeas 
verticales parecen estar 
combadas, en real i dad son 
rectas. El ojo indina la imagen 
para adaptarla al despliegue de 
los rayos 
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j^spgw" 1 * color Estos dispositivos se est an abaratando cada vez mas 

" : : V" : J v:/-" f^d e StS y P ro P orcionan una zona de memoria RAM que 

:: :Vi "~ :r asde contiene toda la informacinn relativa a la escena 

: z-^zz i~z z :e a captada por el ojo del robot. 

in i^^Mi iM^uT ^ En £ enera ^ ^ a saIida de un ojo robot se retiene 

-I '- J- - ': . \'~- en una matriz bidimensionaL cada elemento de la 

::: r : r M :V: r: a :e ; :ua] contiene un valor que corresponde al brillo dc 

: - : :r r :- r : ta luz que cae sobre esa parte concrela de la cscena 

- . _7;_ : . : " e 9 ue se esta contcmplando. La cantidad de elemen- 

A z . - - "-V ; . " tos de la matriz proporciona la resolution de la ima- 

- r n :.= :_ ^ en ^ > 'a gam a de numeros que se puede retener un 
; \\ -_\ \" {}} _ '- '- cada elemento de la matriz determina la cantidad 

s - ~ z ' ' 1 r - de niveles de la escala de grises que se pueden dis- 
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cernir. Tradicionalmente, en los sistemas de vision 
cada elemento de la matriz se denomina pixel o ele- 
mento de imagen. De modo que una matriz de ima- 
gen de 500 por 250 pixels que rcpresente niveles de 
brillo asignandole un byte a cada pixel tendria una 
resolution horizontal de 500 pixels, una resolution 
vertical de 250 pixels, un total de 125 000 pixels y 
256 escalas de grises desde el negro al bianco puro* 
Para dar una idea del detalle que proportion aria tal 
imagen, considere una imagen de television estan- 
dar. E! sistema espanol utiliza 625 lineas verticales, 
de modo que la resolucion vertical es de 625 pixels. 
Para obtener una resolucion similar en sentido ho- 
rizontal, se necesitarian aproximadamente 1 000 pi- 
xels (porque la pantalla es mas aneha que alta), y 
los niveles de escala de grises se podnan represen- 
tor mediante eJ mismo unico byte para proporcio- 
nar 256 niveles de brillo. Un sistema robot eon una 
resolucion equivalente daria una imagen aceptable 
para que la procesara el ordenador, 

Los procesos que debe realizar el "cerebro" 
robot con el objeto de "ver" esta imagen siguen 
unas pautas establecidas. El primer paso supone 
ajustar los niveles de escala de grises de modo que 
los pixels adyacentes con niveles simi lares de escala 
de grises se "emparejen" al mismo niveL El orde- 
nador trabaja sobre la superficie completa dc la 
imagen uniformizando los niveles para eliminar 
cualquier pequena irregularidad. Una vez hecho 
esto, el ordenador vueive a examinar la imagen, 
percibiendo todos los pixels adyacentes que poseen 
niveles de escala de grises notoriamente diferentes; 
estas diferencias se enfatizan entonces. La finalidad 
de esto ultimo es lograr que las caracteristicas im- 
portantes dc la imagen se marquen con lrmitcs, 
tales como lineas y bordes, que aparezcan como 
cambios subitos en el nivel de escala de grises: el 
ordenador toma nota de los misrnos, enfatizan dolos 
para asegurar que sobresalgan. 

Despues de realizado esto, el ordenador explora 
de nuevo la imagen en busca de todos los cambios 
verdadcramente signifkativos en los niveles de es- 
cala dc grises. Luego utiliza los mismos de forma 
muy parecida a como resolverfa un ser humano uno 
de esos acertijos graficos que aparecen en periodi- 
cos y tebeos que consisten en unir correlativamente 
una serie de puntos para componer una imagen. En 
la mayoria de estos jucgos se cuenta con la ayuda 
que supone el hecho de que los puntos esten nume- 
rados; el ordenador no dispone de tal ayuda y sim- 
plcmente debe seguir lo que parezca una ruta. Al 
final de este proceso el robot tendra una imagen 
interna de la escena en fa cual habra "suavizado" la 
imagen y dibujado lineas alrededor de aquellos 
objetos que parezcan ser importantes. 

Pero ^es esto "ver"? En realidad, todo lo que ha 
hecho el robot es llevar a cabo ciertas transform a- 
ciones de la escena; en otras palabras, to da via no 
4£ sabe" que es lo que esta mirando. 

Existen dos soluciones para este problema. La 
primcra consiste en programar al robot con un 
conjunto de reglas que se expresan como una seric 
de sentencias simples acerca del mundo visual Esto 
se conoce como aproximacidn de aba jo arriha 
{bottom-up) a la percepcion visual, frase que alude 
a I hecho de que el robot empicza con cos as muy 
simples y a partir de ellas intenta evaluar lo que 
esta viendo en un nivel de comprension mas com- 
ply jo. El segundo enfoque es el de programar al 



Vision del robot Aplicaciones 




robot con un conjunto de objetos que es probable 
que vea y dejar luego que examine la imagen para 
ver si alguno de estos objetos esta presente, Esto se 
denomina aproximacion de arriba abajo (top-down) 
en razon de que el robot empieza con una idea de 
alto nivel muy compleja acerca de lo que podria 
estar viendo y luego comprueba si se corresponde 
con su verdadera entrada visual. 

Para ilustrar la diferencia entre los dos metodos. 
considere un robot que este mirando una mesa. La 
:imacion de abajo arriba consiste en analizar 
la imagen y descubrir que con tie ne cuatro partes 
verdeales y, junto a la parte superior de las mismas, 
una gran superficie horizontal. Esto corresponde al 
conocimiento preprogram ado de que podria haber 
una gran superficie descansando sobre cuatro pat as 
y que esta estructura seria lo que se denomina una 
mesa. La aproximacion de arriba abajo empezaria 
con el robot mirando a la mesa e interrogandose: 
"^Es esto una mesa?" Esta pregunta se la puede 
formular por que posee un modelo intemo de una 
mesa con el cual comparar su entrada visual. 

En general, la aproximacion de abajo arriba ca- 
pacita al robot para ver cosas con las que nunca se 
ha encontrado y para entender algo acerca de ell as : 
pero para hacer esto precisa una gran cantidad de 
programaci6n detallada que le proporcione las re- 
glas basicas necesarias acerca del mundo con el cual 
se encontrara\ Sin embargo, la aproximacion de 
arriba abajo permite que el robot solo reconozca 
objetos sobre los que ya pose a algun conocimiento 
interno; de mo do que cualquier cosa nueva supon- 
dna problem as. 

Los disenadores de robots utilizan ambos meto- 
dos y en ocasiones los combinan, Farece probable 
que los humanos empleemos procedimientos simi- 
lares para la perception visual; no obstante, lo ha- 
centos automaticamente y no somos conscientes de 
que estos procesos se estan realizando. 

Pero la vision del robot, de momento, dista 
mucho de ser perfecta. Ello se debc a varios moti- 
vos. Uno de los mas importantes es la inmensa can- 



Reconocer 
objetos 

Para ap re rider un objeto, un 
robot sigueun proceso similar 
a! aprendizaje humano: to ma 
la imagen quevey la compara 
con la imagen de un objeto 
conocido hasta hallar una 
pareja. A diferencia de los 
humanos, sin embargo, los 
robots pose en una capacidad 
visual llmitaday solo pueden 
almacenar una gama de 
patrones de objetos muy 
restringida. Al no con tar con 
la profundi dad de la 
experiencia humanay las 
capacidades com pa rati vas tan 
desarroltadas del hombre, el 
robot no puede determinar 
que el objeto percibido 
corresponde a los perfiles 
almacenados conocidos como 
"telefono ni siquiera 
haciendo rotar su imagen en 
varias posiciones 



tidad de potencia de proceso que se necesita para 
procesar una imagen. Recuerde que el sistema de 
nuestro ejemplo tenia 125 000 pixels almacenados 
cada uno como un byte; por eonsigmente, se debe- 
rian procesar mas de 122 K dc memoria para cada 
imagen. Si bien hemos simplificado nuestra des- 
cription, muchos de los procesos que se deben He- 
var a cabo en cada pixel son bastantc complejos 
desde el punto de vista matematico. Si el robot ha 
de observar el mundo que lo rode a en "tiempo 
real" (es decir, considerar los acontetimicntos a 
medida que se van produtiendo). entonces se reci- 
ben 25 image nes difercntes por segundo (esto tam- 
bien es asi en el caso de las camaras de television), 
Ello significa que el robot ncccsitaria procesar mas 
de 3 050 K de datos por cada segundo, ;lo que equi- 
vale aproximadamente al contenido de mas de una 
doccna de discos flexibles! 

Para tratar el problema del proceso se pueden 
considerar dos enfoques. Uno consiste en desarro- 
Mar hardware para fines especiales que efectue el 
procesamiento de las image nes (este tipo de hard- 
ware esta comenzando a aparecer en la actualidad), 
Por otra parte, la resolution de la imagen y la canti- 
dad de niveles de escala de grises se podrian reducir 
para adaptarse al hardware existent e, Esto condu- 
ciria a que la imagen se procesara mas rapidamen- 
te, pero la caiidad de esta seria inferior. 

En estos momentos, sin embargo, el tema de la 
vision del robot todavia no se entiende del todo, al 
menos no mas de lo que se comprenden los detalles 
acerca de la vision del hombre. Cuando utilizan un 
sistema de vision, los robots a menudo cometen 
errores, Bien podria suceder que. finalmente, la 
unica respuesta fuera desarrollar sistemas en los 
cuales el robot "aprendiera" a ver cosas en vez de 
program arlo detail adamente sobre que es Lo que 
puede y no puede ver. Y a la Iarga podria darse el 
caso de que nunca pudiera "ver" las cosas correcta- 
mente hasta el desarrollo de una forma que le pro- 
porcionase un conocimiento niucfusimo mayor 
acerca del mundo circundante. 



Prog r a mac ion/P rog ram as de utilidad 



Todas 
cambian 

En el Spectrum es distinta la 
implementation del programa 
de sustitucion de variables: la 
utilidad se mezcla al final del 
programa 

A medida que el programa dc sustitucion de varia- 
bles explora a traves del programa, va haciendo 
una copia de la version modificada cm una zona por 
encima de RAMTOP, La version modificada se vuel- 
ve a copiar entonces en la zona del programa prin- 
cipal mediante un programa en codigo maquina 
que regula la cantidad de espacio disponible si se ha 
alterado la longitud del programa, de modo que ia 
nueva version quepa en la zona para basic. 

La primera parte del programa en basic es simi- 
lar al programa de busqueda de variables (vease p. 
1145). Hay algunas variables extras, incluyendo Alt- 
prog, que senala el comienzo de la zona reservada 
para la copia del programa, y Altapunt que Ileva el 
registro de a donde debe ir el siguiente byte del 
programa modificado. Los cam bios principals im- 
plican copiar el programa, en vez de simplemente 
leerlo. El copiado se realiza mediante la subrutina 

Escritura automatica 

Los Opcodes LDJRy LODR del 
Z80 son instrucciones para 
transferencia bicques que 
Lttilizan el incremento o e! 
oecremento automates: el 
registro HI $e initialize para 
apuntaraf comienzo del 
btoque fuente o emisor, DE 
debe apuntar a I comienzo del 
destfno o receptor, y BT debe 
con ten er la cantidad de bytes 
del bloque. LDIRy LDDR 
copian entonces el byte fuente 
en el byte de destine 
mermen tan do o 
decrementando 
autumaticamente HL y DE 3 y 
decrementando BC hasta que 
Begaacero, cuando se 
constoera completa !a copia. 
Observe que LDIR es una 
copta*tonta» (vease p. 
1206): se da por supuesta la 
iriefgenciadei programador 
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Programa de sustitucion 
de variables 

9000 INPUT H Nombre a buscar?' 1 ; LINE tS 
9005 INPUT "Reemplazar por?"; LINE r$ 
9010 FOR 1=1 TO LEN (t$) 

9020 IFt$(i)> = "a" AND t5(i)< = "z" THEN LET t$(i)=CHRS (CODE 

(ttffl) -32) 
9030 NEXT i 

9040 LET 0i Stint REM =234 
9050 LET Comi|fas=34 
9060 LETNuevalinea=13 
9070 LET Subrayado =95 
9080 LETNumero=14 
9090 LETPR0G=23635 

9100 LET Apuntexto^ PEEK (PROG) +256* PEEK (PROG +1 ) 
9102 LETAItprog=4600G 
9105 LET Altapunt -Altprog 

9110 LET Numfinea=256-PEEK (Apuntexto) + PEEK (Apuntexto+1) 

9111 PRINT Numlinea 

9120 IF Numlinea >=90O0 THEN GO TO 9S00 
9130 LETq=2:GOSUB98Q0 
9135 LET Longdir= Altapunt 

9140 LETSiglinea=Apuntexto+2+PEEK(Apuntexto)+255*PEEK 

(Apuntexto+1) 
9150 LETq=2:G0 SUB 9300 
9160 LET 8ytc= PEEK (Apuntexto): LET q=1 :GO SUB 9800 
91 70 IF Byte= Nuevalinea THEN GO TO 91 1 0 
9180 IF ByteoDistint REM THEN GO TO 9220 
9190 REM Copiar REM sin alterar 
9200 LET q=Siglmea-Apuntexto:GQ SUB 9800 
9210 GO TO 9110 

9220 IF ByteoComillas THEN GO TO 9280 

9230 REM Copiar to do Jo que este entre comilFas, pero parar al final 

de la linea en case de comilFas sin cerrar 
9235 LET q=1 

9240 IF PEEK [Apuntextc^q-1)=NrjevalineaTHEN GO SUB 

9800:GOT0 9T10 
9250 IF PEEK (Apuntexto + q - 1 ) = Comi I las TH EN GO SUB 9800:GO 

TO 9160 
9260 LET q-q+1 
9270 GO TO 9240 

9280 REM Copiar numero binario de 5 bytes 

9290 IF Byte= Numero THEN LET q=5:GO SUB 9800:00 TO 91 60 

931 0 REM El primer caracter del nombre debe ser una letra en 

mayusculao minuscula 
9320 tFByte> = C0DE ("A") AND Byte< -CODE {'7' 1 } THEN LET 

c$=CHR$ (Byte):GO TO 9370 
9330 REM Usar mayusculas en vez de minusculas 
9340 IF Byte>=CODE ( V) AND Byle<=CODE ( u z") THEN LET 

C$=CHR$ (Byte-32):G0 TO 9370 
9360 GOTO 9160 
9370 LET n$="" 
93S0 LETnS=n$+cS 

9400 REM Letra, drgito o subrayado despues del primer caracter del 
nombre 

9410 IF PEEK (Apuntexto)> = C0DE ("A") AND PEEK 

(ApuntextO)< = CODE ("Z") THEN LET C$=CHRS (PEEK 
(Apuntexto)) LET Apuntexto = Apuntexto + 1 :G0 TO 9380 

9420 REM Usar mayusculas en vez de minusculas 

9430 IF PEEK (Apuntexto)>=C0DE ( "a") AND PEEK 

(Apuntexto)<=CODE ("z") THEN LET c$=CHR$ (PEEK 
(Apuntexto) -32): LET Apuntextn - Apuntexto + 1 :G0 TO 9380 

9440 IF PEEK (Apuntexto)>=CODE ("0") AND PEEK 

(Apuntexto)<=CODE( ,i 9 s, )THEN LETcS=CHRS (PEEK 
(Apuntexto}) : LET Apuntexto = Apuntexto +1 :GO TO 9380 

9450 IF PEEK [Apuntexto )= Subrayado THEN LET cS=CBR$ [PEEK 
(Apuntexto) ■): LET Apuntexto = Apuntexto +1 :GO TO 9380 

9460 REM Terminar con $ para variable en serfe 

9470 IF PEEK (Apuntexto) = CODE ('T')THEN LET n£=n$+'T:LET 
Apuntexto=Apuntexto+ 1 : GO TO 9500 

9480 REM (si matriz o funcion 

9490 IF PEEK(Apuntexto)=CODE (T) THEN LET n$=nS+CHRS 

(PEEK (Apuntexto)) : LET Apuntexto = Apuntexto + 1 
9500 IF n$=t$ THEN LET n$=r$ 
9505 LET Aitapunt=Altapunt~1 
9510 F0Rp=1TGLEtf{nS) 
9520 FOKEAItapuntXQDE(n$(p)) 
9530 LET Altapunt=Altapunt+1 
9540 NEXTp 

9550 lFnSor$THENG0T0 9160 

9560 LET Long baja = PEEK (Longdireccion) + LEN (r$)-LEN (tS) 

9570 JF Longbaja>255 THEN LET Long baja= Long baja- 256; POKE 

Longdireccion+1 ,1 + PEEK (Longdireccion + 1 ) 
9580 POKE Longdireccion, Longbaja 
9590 GOTO 9160 



1234 



Programas de utilidad/Programacion 



9599 REM Prepararse para desplaiar programs alterado nueranoie 
a zona proa ra ma principal 

9600 LET Antioualong=ApuMexto-(P£EK (PR0GH2S6'PEB£ 
(PROG-1)) 

9610 LETNuevalong^Mapunt-AltjMog 

9620 POKE 45Q6Q,Nuevalong-25rilff( W>grtM^ SS» 

9630 POKE 45061 JNT(m»i*P02SS 

9660 POKE *5C55 -: . - - -295**! .ApurE3G&256) 

- :^osg > P TiHgTHEH RAHPOtMZE USR (45034) 

X=j^tfiadD-(Anbguak)og-Nuev3long) 
WIO POKE 45058. X- 256' I NT 56) 
9720 POKE45Q59.tNT(X/256) 

9730 I F Anttgualong < N uevalo n g THEN RANDOMIZE USR 45062 

9740 i F Antigualo ng > M Lrevalo ng THEN RANDOMIZE USR 45074 

9800 FO R p = Apuntexto TO Apu ntexto + q - 1 

9810 POKE Altapunt. PEEK (p) 

9820 L ET Altapunt = Altap u n* + 1 

9830 NEXTp 

9340 LET Apu ntexto =p 

9350 RETURN 

9900 SAVE "SUSTITUCION" LINE 991 0:SAVE ' SUST MC'CODE 

45064.37: STOP 
9910 CLEAR 45055: LOAD "SUST MC~CODE 



Cargador de codigo 
maquina 

10 CLEAR 45055 
20 LET a=45062 
30 FOR ! = 1000 TO 1040 STEP 10 
40 LETS=0 
50 FQRa=aT0a+7 
60 READ b 
70 POKE a.b 
80 LETs=s+b 
90 NEXT a 
100 READ c 

110 IF soc THEN PRINT' ERROR DE DATO EN LINEA" ;L STOP 
120 NEXT I 

1000 DATA 42 ,0,1 76,237, 75,2,1 76,205,91 3 
101O DATA 85, 22,24, 1 0,42,0.1 76,237,596 
1020 DATA 91 ,2,1 76,205,229,25,33,1 76,937 
1030 DATA 179,237,91 ,83,92,237,75,4,993 
1040 DATA176.237.176,207.255,0,0,0,1051 



Programa de sustitucidn 
en assembly 



0000 




Hcsm 


EQU 


S J 555 


:::: 




RCLAM1 


EQU 


S19E5 


0000 




TO 


EQU 


SB000 


0000 




T1 


EQU 


SB002 


0000 




T2 


EQU 


$B004 


0000 




ALTPRG 


EQU 


SB3B0 


0000 




PROG 


EQU 


S5C53 


BOOS 






ORG 


$B006 


eoos 


2AO0B0 


UP 


LD 


HL, (TO) 


B009 


ED4B02B0 




LD 


BC.(T1) 


BOOD 


CD5516 




CALL 


HCSITI 


B010 


180A 




JR 


COPY 


m2 


2A00BO 


DOWN 


LD 


HL, (TO) 


9815 


ED5B02BO 




LD 


DE, (T1) 


=0'9 


CDE519 




CALL 


RCLAM1 


B01C 


21B0B3 


COPY 


LD 


HL, ALTPRG 


601 F 


ED5B535C 




LD 


DE.(PROG) 


B023 


ED4B04B0 




LD 


BC, (T2) 


6027 


EDBO 




LDIR 




B029 


CF 




RST 


8 


B02A 


FF 




DB 


SFF 



de la linea 9800 s que copia la cantidad de bytes es- 
pecifkada por q y actualiza los apuntadores de los 
programas antiguo y nuevo > 

Los nombres de las variables se oopian mediante 
el codigo que comienza en la linea 9500 y, si el 
nombre de la variable se ha modificado, se alteran 
los dos bytes del principio de la linea que retieneo 
la longitud de la Imea, para reflejar el cambio en la 
longitud. 

Despues de que todo el programa se ha modifi- 
cado y se ha copiado en la nueva zona, el programa 
basic calcula los valores que necesita el codigo ma- 
quina para volver a copiar el programa alterado, y 
luego coloca (POKE) estos valores en las posiciones 
de memoria donde el codigo maquina espera ha- 
llarlas. Si el programa nuevo y el antiguo tienen la 
mis ma longitud, el nuevo programa se puede co- 
piar en el mismo espacio que ocupa el programa 
antiguo. En este caso, la unica informacion que 
precisa el programa en codigo maquina es la longi- 
tud del programa. 

Si el programa nuevo es mas largo que el anti- 
guo, necesitamos hacer espacio extra en la zona de 
programas desplazando hacia arriba la rutina de 
sustlrurion de variables, que deseamos conservar. 
El espacio extra se consisue llamando a la subruti- 
na de ROM. HACER-SITI0. en la direccion 1655 
hexa. Cuando se llama a HACER-SITI0, el registro 
doble HL debe contener la direccion de despues del 
lugar donde se ha de hacer el espacio, y el registro 
doble BC debe contener la longitud del espacio ne- 
cesario. El valor requerido para HL no es mas que 
el valor final de Apuntexto, y el valor de BC es la 
diferencia cntre la longitud antigua y la nueva. 

Si el programa nuevo es mas corto que el anti- 
guo, hemos de desplazar hacia abajo el programa 
de sustitucidn de variables. Esto lo po demos hacer 
utilizando la subrutina de ROM RECLAMAR-1 de 
la direccion 19E5 hexa. Cuando se llama a 
RECLAMAR-1 , el registro doble HL debe contener la 
direccion del primer byte a dejar solo, y el registro 
doble DE debe contener la direccion del primer byte 
a reclamar. El valor requerido para HL es, nueva- 
mente, el valor final de la variable Apuntexto, y el 
valor requerido para DE se calcula restandole a 
Apuntexto la diferencia entre la longitud antigua y la 
nueva. 

El programa alterado se vuelve a copiar en la 
zona del programa principal mediante la instruc- 
tion para mo%imiento de bloques LDIR (L#aD with 
Increment and Repeal). La direccion de comienzo 
de la zona del programa alterado se carga en HL, la 
direccion de comienzo de la zona del programa 
principal en DE, la longitud del programa alterado 
en BC, y despues la instruction LDIR desplaza todo 
el programa alterado, byte a byte. 

Las dos ultimas lineas del programa en lenguaje 
assembly utilizan otra rutina de ROM, en la direc- 
tion 8. Esta es una rutina de «informe» que impri- 
me un mensaje de error y otros comentarios. La 
rutina es Uamada por la instruction RST 8, y el in- 
forme producido se especlfica por el byte que sigue 
a la instruction RST 8. El valor del byte es uno 
men os que el numero del informe, de mode que FF 
hexa, o - 1 , da el OK o el informe de Programa termi- 
nadO; 0 da NEXT sin FOR, y asi sucesivamente. El 
programa en codigo maquina termina con RST8, en 
vez de la habitual instruction RET, para evitar el 
retorno al programa en basic que se ha desplazado. 



Dando 
el tono 



Veamos otros dos parametros 
de la sintefizacion de sonido: 
volumen y altura 



El vo lumen de un tono esta determinado por la es- 
cala de oscilacion de la forma de onda que genera 
el tono. Oicho en otras palabras, el volumen de- 
pende de la diferencia entre el valor maximo de la 
forma de onda y el valor minimo, Esta propiedad 
de una onda sonora se denomina amplitud. 

UtiJizando un sencillo programa en basic para 
hacer oscilar valores colocados en el registro de la 
puerta para el usuario podemos demostrar cuan fa- 
cilmente se puede controlar la amplitud de una 
forma de onda digital, 

10 REM AMPLlTUD/FfiECUEMClA BAS CBM 

20 : 

25 RDD^SflS79:H£GDAT«56577 

30 POKE FlDD r 255:REM TODAS SAL1DA 

40 FQRU255T00STHP-15 

50 FOR J-tTO10O 

B0 POKE REGOAT.hPQKE REGDAT.O 

70 NEXT JJ 



800 REM **** PflOGRAMA MUESTRA 

805 
SC-: 



UPS-CHKSfUS] 

DIV=4979e:flEM POStCIOtt FACTOR AHPifTUD 
0EL= J9799-REM P0SICP0N FACTOR DEM0RA 
TME =49800: REM FACTOR 0URACP0N 
CALL*49B01:REM Q1RECCI0K COMIENZO PROGRAMA 



m 

860 ROO-56577:POKEROD.255:REMTaOASSAUDA 
8(70 ; 
680 

m 

900 
910 
920 
930 
940 



990 
1000 
1010 
1020 
1030 



PRI«TCHRS(147):REM LlMPIAR PANTALLA 
FftlNTilNPUr FACTOR DE AMPLITUD 0-7 M fA 
IF FA<0 OR FA>7 THEN PRINT UPS,UP$;:G0T0B9Q 
PGKEON.FA 

PRf NT:!NPUT" FACTO R D E DEM OR A 1 - 1 01' :FO 
IF FD<0 OR H>101THEN PRINTUPS;UPS;;GOT0960 
P0KETME.FT 

SYSCAa 

GETAS;IFAS="" THEN 101 □ 

IFAS--X" THEN 660; REM REC0MENZAR 

GOT0 1000: REM QTR0 BEEP 



Al principio del programa se genera una forma de 
onda to sea que oscila entre 255 y 0 + Ello significa 
que la amplitud de la onda es 255. A medida que se 
va ejecutando el programa, el valor superior colo- 
cado en el registro de datos se reduce en pasos de 
15. A medida que disminuye el valor superior va 
disminuyendo igualmente la amplitud; y et efecto 
de esto, al escuchar el sonido producido a t raves de 
un amplificador estereo o un par de auriculares, es 
que el volumen del tono se va reduciendo gradual- 
men te hasta desaparecer* De mo do que el volumen 
de un tono sintetizado digitalmente se puede con- 
trolar limit ando la escala de valores colocada en el 
registro de datos de la puerta para el usuario. 

La altura de una nota esta gobernada por la fre- 
cuencia de la onda generadora; o sea, el numero de 
ciclos de form as de onda por segundo: cuanto 
mayor es el numero de for mas de onda producido 
por unidad de tiempo, mas alta es la altura de la 
nota oida. 

La frecuencia se puede controlar digitalmente de 



Construct ibn modular 

Las forrnas de onda se pueden 
modularya sea por frecuencia o 
por amplitud, La frecuencia 
altera !a altura del tono of do y 
esta determinada por el numero 
de ciclos de forma de onda 
producidos por segundo. La 
amplitud altera el volumen del 
tono y es la diferencia entre Jos 



valores maximo y minimo de un 
ciclo. Losdiagramas ilustran 
cdmo se puede modular la 
amplitud de modo que el 
volumen del tono producido 
vaya disminuyendo 
gradualmente y c6mo se puede 
modular la frecuencia para 
producer un tono cuya altura se 
el eve 



MDDULACJON DE AMPLITUD 



TIEMP0 

MODULACJON DE FRECUENCIA 



TIEMPO 



dos maneras principals : la primera es incremen- 
tando la frecuencia desde un 1 unite inferior, toman- 
do menos muestras de la forma de onda. Si una 
onda se dividiera en 100 muestras, por ejemplo, a 
un programa en codigo maquina le llevaria un cier- 
to tiempo colocar cad a valor en sucesion en el regis- 
tro de datos, y, por lo tanto, se podria producir 
cierta cantidad de forrnas de onda completas por 
segundo. La cantidad de muestras, obviamente, de- 
termina la frecuencia del tono escuchado. Para du- 
plicar la frecuencia, el programa en codigo maqui- 
na podria. en cam bio, tomar de la tabla de datos 
que define la onda s61o un valor de cada dos. La 
frecuencia se podria triplicar tomando un valor de 
cada tres, y asf sucesivamente. Este metodo tiene 
dos desventajas. La primera es que resulta dificil 
hacer pequenos ajustes de frecuencia sin distorsio- 
nar la forma de la onda. En segundo lugar, a medi- 
da que la frecuencia aumenta, la onda generada 
tiene cada vez menos relacidn con la forma de onda 
original, dado que se utilizan menos muestras. 

Un metodo alternativo consiste en empezar con 
un bucle que vaya saltando a traves de los datos de 
la forma de onda lo mas rapidamente posible, pro- 
porcionando, por lo tanto, una frecuencia maxima. 
La frecuencia se puede, entonces, ajustar insert an- 
do en el bucle pequenas demoras. Esto nos da un 
control mucho mas preciso sobre la frecuencia del 
tono, pero significa que el numero de muestras que 
componen la forma de onda debe ser pequeno si se 
ha de obtener una frecuencia maxima razonable- 
mente elevada. Podemos emplear el segundo de 
estos dos metodos para producir un programa en 
codigo maquina que nos permita controlar tanto la 
frecuencia como el volumen. 

El mejor metodo de reducir la amplitud de la 
forma de onda, conservando al mismo tiempo la 
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forma global de la onda, consiste en divider cada 
valor de la tabla de la forma de onda en fonddn de 
una constante. Esto se puede hacer de dos mane- 
ras: despues de car gar en el acumulador cada valor 
pero antes de colocar el valor en el registro de 
dates, o antes de eiurar en el buck principal del 
programa. H primer metodo aumentara la canti- 
dad" de tiempo requerida para ejecutar cada ciclo 
dd bude principal % puesto que este factor limita 
_ : .:. m _ ia r. icbernos op tar por 

el segundo metodo, A partir de la tabla de forma 
de onda original se produce una segunda tabla, di- 
vidiendo por una constante cada valor tornado de la 
tabla original, colocando luego el resultado en la 
nueva tabla, Esta es utilizada, entonces, por el 
bucle principal del programa para los datos de 
forma de onda. El metodo de division empleado es 
burdo. Una constante de amplitud determina la 
cantidad de veces que el valor de la tabla se despla- 
za hacia la derecha. Puesto que cada desplazamien- 
to hacia la derecha es una division entera por dos, 
el efecto de utilizar un factor de amplitud de n es el 
de dividir cada tabla por In. 

Cuando el factor de amplitud es cero se utiliza la 
tabla original, y el programa se modifica a si rriismo 
para especificar la direction base de esta. en vez de 
la de la tabla de valores divididos, 

La ejecucion del bucle principal del programa se 
puede demorar mediante la inserci6n de un peque- 
no trozo de codigo cuya unica mision es dejar trans- 
currir el tiempo mientras se io ejecuta. Normal- 
mente esto se hace decrementando o bien un nu- 
mero de ocho bits en uno de los registros indice, o 
un numero de 16 bits de la memoria, desde un valor 
de demora dado hast a cero. Veremos que si calcu- 
lam os las demoras maximas logradas mediante 
est os dos me tod os, la diminution de un numero de 
ocho bits proporcionara la demora suficiente. 

El problema fundamental no es el de proporcio- 
nar suficiente demora (es decir, producir la fre- 
cuencia mas baja), sino proporcionar la demora mi- 
nima; dicho en otras palabras, producir la frecuen- 
cia maxima. En la pagina 1212 utilizamos una 



forma de onda dividida en 80 pasos. El codigo extra 
requerido para la demora retrasa tanto el tiempo 
de ejecucion, que ya no resulta practico tener esta 
cantidad de pasos. Debajo se indica el codigo de 
que consta el bucle principal. 



PRAL 




Tiempo en ciclos de maq. 




LDX # $00 


2 


SIGVAL 








LDA AMPTAB.X 


4 




LDY DEMORA 


4 


MASDEM 








DEY 


2 




BNE MASDEM 


3 (2 si fracasa el bucle) 




STA PUERTA 


4 




[NX 


2 




CPX # PASOS 


2 




BEN SIGVAL 


3 (2 si fracasa el bucle) 



El numero total de ciclos de maquina requeridos 
viene dado por: 2+ (4 +4+ (2+3) X demora- 1+4 
+2 +2 + 3) x pasos- 1 - 1 + (18+ 5 x demora) x pasos : 
y un valor minimo de 1 produce la frecuencia maxi- 
ma: free max= 1000000- (1 +23 x pasos). 

Para una frecuencia maxima de alrededor de 
3 000 Hz. esta formula indica que el numero de 
pasos es 15. Esta es la cantidad de muestras de la 
forma de onda que debemos utilizar para producir 
una frecuencia maxima razonable. Empleando 15 
pasos, la formula original se puede escribir como; 
n.° de ciclos de maquina = 271 +75 x demora, 

Si requerimos una frecuencia minima de, supon- 
gamoSj 128 Hz (alrededor de dos octavas por de- 
bajo de do central) , entonces el valor de demora 
sera 101 . Este valor puede ser mantenido y decre- 
mentado en un registro mdice, 

Ei ultimo problema producido por una frecuen- 
cia alterada es que, para un numero dado de repeti- 
ciones del bucle de demora, la du radon del tono 
producido disminuira a medida que aumente la fre- 
cuencia, Ello se debe a que, puesto que esta au- 
menta, ejecutar el bucle principal lleva menos tiem- 
po. Para equilibrar esto debemos mtiuir un calculo 
que establezca la cantidad de repeticiones requeri- 
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METODO DE MUESTRAS ALTERNAS 



TIEMPO 




METODO DE DEMORA 



TIEMPO 



4 5 




TIEMPO 



Estirantfo la serpiente 

La frecuencia de una onda 
muestreada digital me nte se 
puede alterar to man do menos 
muestras o insertando una 
demo ra entre cada valor de 
muestra. Si la tabla original para 
Ea onda contiene 15 muestras de 
!a onda, la frecuencia de la onda 
de as lida se puede duplicar 
to man do s6lo muestras 
alternas. For otra parte, se 
pueden producir todos los 
valores, los 15, insertando una 
demora para duplicar el tiempo 
invertido en producir la onda 
completa, reduciendo a la mitad 
la frecuencia. El primer mitodo 
per mite utilizar muchas 
muestras en frecuencias 
inferiors pero solo admite un 
control burdo de f recuencia. 
Con el segundo procedimiento 
es posible lograr un control de 
frecuencia mucho mds fino, 
pero significa que se pueden 
utilizar menos muestras 
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das para producir un tono para una duracion dada, 
independientemente de cual sea la frecuencia de los 
tonos* Si hacemos que la untdad de duracion sea de 
l/50avo de un segundo, el numero de repetieio 
nes para un valor de demora dado sen a: 
1000000- (50 x (271 +75 x demora). Calcular esto 
en codigo maquina seria dificil y lento, de modo 
que prepararemos desde basic una tabla que ofrez- 
ca un valor tornado de la formula anterior para 
cada valor dc la demora (o sea, de 1 a 109). La 
rufina en c6digo maquina entonces ha de buscar el 
valor de repetition y almacenarlo en un decremen- 
tad or, para producir un tono que dure l/50avo de 
segundo. 

Los usuarios de Commodore que posean un en- 
samblador pueden entrar el listado del codigo fuen- 
te y ensamblarlo, para producir un programa obje- 
to que se pueda guardar. El programa de llamada 
volvera a cargar cl programa objeto desde disco o 
cassette y preparara las tablas. Entrelo y ejecutelo. 
Digite NEW y entre el programa muestra en basic 
que da las diversas directions de posiriones que 
utiliza el programa cn codigo maquina, Ejecute 
este programa con la caja buffer y el convertidor 
D/A dispuestos tal como se explica en la pagina 
1212, Si no posee ensamblador, entonces entre y 
ejecute este programa cargador en basic antes de 
ejecutar el programa de llamada. Si utiliza el carga- 
dor de basic, entonces puede omitir las lineas 45 y 
50 del programa de llamada. 

Los usuarios de BBC deben entrar la version 
para el BBC tal como esta escrita y ejecutarla, 

10 REM CARGADOR BASIC PARA PROGRAMA FREOAMP 

20 : 

30 FOR I =49801 TO 49911 
40 READ A:P0KEl,A 
50 CC=CC+A 
60 NEXT I 

70 READ CS:IF CCoCS THEN PRINT" ERROR SOMA CONTROL" :ST0P 
100 DATA1 72,134,194,208,8.169,0,141 
110 DATA204,194 P 76 1 174 1 194,169,15,141 
120 DATA204 < 194 t 162,15,172,134,194,189 
130 DATAO, 1 94,24, 1 06, 1 57.15,1 94. 1 36 
140 DATA208 1 248,202.16 1 239,120.169,0 
150 DATA1 41 ,1 33,194.1 74,1 35, 1 94 J 69,30 
160 DATA194,172,136J 94,240.7.10.46 
1 70 DATA1 33,1 94, 1 36,208,249, 1 41,1 32 
180 DATA194,162,0,1S9,15,194,172,135 
190 DATA194,136,20e,253,141,1,221.232 
200 DATA224,15,208,239,173,132.194.56 
210 DATA233,1, 141 ,132,1 94, 173, 133,194 
220 DATA233.0.141 .133,194,208,218.169 
230 DATAO,205, 132, 194.208,21 1,85,96 
240 DATA16186:REM * SUMA CONTROL 4 



10 

20 
30 
40 
45 
50 
60 
70 
75 
80 
90 
100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 



REM " " PROGRAMA DE LLAMADA 

REM **** Y 

REM * * * T PREPARACION TABLA **" 

DN^8:REMSI CASSETTE DN=1 

IF A=0 THEN A=1 10AD"FREC.HEXA" , DN, 1 



REM 1 



1 PREPARACION TABLA FORMA ' 



S=15:TB=1 2*4096+2*256 

FOR l=0TOS-1 

Y=127'SiN[X)+127 

P0KETB+I.Y 

X=X+2/S 

NEXT I 

REM **** PREPARACION TABLA FRED DEMORA * 

TB=TB+2*S 
FOR D-0TO 101 
TV=10"6/50'(271+75*D)) 
POKE TB+D.TV 
NEXTD 



+ + +■ + T ++ + + "I" + + + ++■ "I- + +■ 

+ + +_+ + + + ++ +■ + + + 4 + + + 



: 




+ + 


: 


GENERACIONOE 




: + +- 


FRECUENCIA Y 


+ + 


: * + 


AMPLITUD 


+ -F 


; ++ 


CBMS4 




; ++ 




+ + 




+ + -!- + -!-+ + + + 




; +-t--r-r+ 


+ + 


++++++ 


PASOS 


=i5 ; 


N.°DE PASOS PORCICLODE0NDA 


PUCB7A 


=56577 




SHAPTB 


SESDO 

*='*PAS0S 


;TABLAF0RMA0NOA 


AMP7AB 


* - * - PASOS 


;TA8 LA AMPLITUD 


BUCIETB 




TABLA FREttDEMDRA 






;CONTADOR BUCLE 


OTflSM 


' = -^1 


f ACTOR DE DIVISION DE ONDA 


DEMORA 




FACTOR DEMORA 


1BH 


- = ■-- 


^FACTOR DLRAOON NOTA 



* PREPAHAH TABLA AAfPUTUD * 
LDYDfVSN 

Brccovr 

LBA#SHAPTB 
STASIGVAI-1 



*!00*RCARPR06RA«A 

PARA CAflfiAft SHAPTB 



LOA*<AMPTAB 

STASWVAL+1 
LDX* PASOS 

T 

LDY DMSN 
LDASHAFTB.X 

CLC 
RORA 

STAAMPTAB.X 
DEY 

BHE MAS 
DEX 

BPL NEXT 
* ESTABLECER VALOR CONTADOR ' 




SEI 

IDA 4 SOD 
STACOrfTADOR+1 
LDX DEMORA 
LDA BUCLETB.JC 
LDY TIEMP0 
aeONOMULT 

T 

ASLA 

RDLCOWTADDR~1 
DEY 

6NE MULT 

tULT 

STA CONTAODR 
* BUCLE PROGRAMA PRINCIPAL ' 



: I NIC CONTADOR KIEYTE 



PRAL 






l_DX#SO0 


5H3VAL 






IDAAMPTAB.X 




U>Y DEMOftA 


MASDEM 






DEY 




BNE MASDEM 




STA PUERTA 




INX 




CPX * PASOS 




BEN S1GVAL 



* DECREMENTAR COHTADOR 

LDA CONTAODR 

SEC 

SBC #S01 
STA CONTADOR 
LDACOHTAO0R41 
SBC #sm 

STACONTADQR+1 

BNE PRAL 

LDA^SOO 

CMPCONIAD0R 

BNE PRAL 

CLI 

RTS 



GENERACION 0£ 
FRECUENCIA Y 
AMPLITUD BBC 



15 REM ■ ** 

20 REM " 
25 REM " 
30 REM " 
40 REM " 
50 REM 

60 REM " 

» MODE? 

95 pasos = f5:puer1a=&FE60 

97 rdtf=&FE62:^ rdd=255:REM TOD AS SAL IDA 
1 00 HIMEM = HIMEM - &101 :REM RESERVAft ESPACIO TABLA 
110 tahla_(onma= HIMEM -M 
1 1 2 tabla _ amplllud = taUla _ lorman- pasfts 

114 tatn^a _ bucle =itabla _ampMtud -i- pasas 

115 PRCjCpreparar_tgWas 
120 PROCcodigo_as£embJe 
HO REM PROGRAMA, DE PRUERA BASIC ' 
160 CLS 

1 70 PRI NT:INPUT" FACTOR DE AMPL IT JD 0- 7 " :FA 



290 
3O0 
900 

ic:d 

10O5 
1010 
1020 
1030 
«M0 
1050 
1060 
1070 
107S 



IFFA<OORFA>7THEN170 

PRINT; IN PUT" FACTOR DE DEM 0RA 1 101 " ;f0 
IFFD<1 OR fO>101THEN2O0 
?racior_demora=FO 

PRI NT:INPUT" FACTOR DE DURAClOWO-15";F 
IFFT<0OR R>15 THEN 230 
7Factor EiempD=FT 
REPEAT 
CALL free 
AS=GEfS 
UNTIL AS="X~ 
GOTO 160:REM RECQMENZAR 
END 



OtF PflOCcod go 
DIM MC%AFF 
FORopt%=0TO3ST£P3 
P%=MC^ 

CMtaror=P%:P«i=P«i+2 
mor_tiiv=P%:P%..^ i i 
factor_ demon=P^t,:P% =P%±i 
factor, tfempo- P%:P% ^P%+1 
[ 



OFTopttt 




1080 \" 
1090 
1096 .free 
1100 
1110 
1120 
1130 
1140 
11501 
1160 .com 

1170 
1100 
1190 

1135 .next 
1200 
1210 

1220 .mas 
1230 
1240 
1250 
1260 
1270 
1?60 
1290 
1300 \ 
1310V" 
1320 \ 
1330 ;WC 
1340 
1350 
1360 
1370 
1380 
1390 
1400 

1410 .mull 
1420 
1430 

mo 

1450 

1160 .norm 
1470 
1430 
1490 
15O0 

1510 .pral 
1520 

1530 .sigval 

1540 

1550 

1560 .fnasdem 
1570 
1560 
1590 \ 
1600 
1610 
1620 
1B30 
1640 \ 
1050 V * 
1B60\ 
1670 



* PREPARARTABLA AMPLITUD 



LDYtactDf^div 
BSE cc r i 

LDA#iabla_loi^aM00256 

STAsigval-t-1 

JMP inic 



LDA#tabla^ amplitud MOD 256 
STAsigval M 
LOX#pasos 

LDY factor^ diw 
LDAtahla.forma.X 

CLC 
R0R A 

STA tabla _ am plilud 

DEY 

BNE mas 
DEX 

BPL nexl 

ESTABlECER VALOR C0NTADOR'* ' - 



LOA#0 

STAconiador+1 
LDX factor, demora 
LDA tabla. ^_ bucle.X 
LDY factor Eiempo 
BEQ nomult 

ASLA 

ROL CDnlailDr-i-1 
DEY 

BNE mull 

It 

STA contador 
BUCLE PROGRAMA PRINCIPAL ' 



LDA tabla_amplitud.X 
LDY (aclor_tfflmorss 

DEY 

BNE mastfem 

STA pirerta 
INX 

CPX #pa5QS 
BNE sigval 



"OECREMEWTARCOX'ADOR" 



LDAcontado/ 
SEC 
SBC.*1 
STA«Mitador 
LDAcunlador+l 
£BC *0 

STA«fjttador+i 
BUEprai 
LDA #0 
CMPcafitadar 
BNE pral 
CLI 
RTS 



1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1900 ] 
1310 NEXT0pt% 
1820 ENDPR0C 

1999 : 

2000 DEFPROCpreparar tablas 
2005 k=0 

2010 FOR N tab]a_forma TO labia _ forma +pasQS-1 

2020 y-127*SIN(K) 5 l27 

203O ?i=y 

2040 it^K+J^Pl/pas-os 

205O NEXT I 

Z06O : 

2070 FORdemora-iOTOIOI 
2D80 val _ bucle= 1 0'e.'SO" (271 +75 ' demora J) 
2090 tabla_bude?demDra=val bucle 
2100 NEXT demora 
2120 ENDPflOC 
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Dispositivo «magico» 



He aqui un dispositivo que 
perrnite producir una imagen en 
pantalla con solo orientar una 
camara hacia el objeto 



El EVI Video System, tambien conocido como 
"Snap" (instantanea), ticnc un prccio que sc ajusta 
muy bien al presupuesto del usuario de un ordena- 
dor personal. Complete con el software, cuesta 
menos de la mitad que cuaiquier interface para 
video comparable. El sistema Snap se compone de 
una pequena camara electronic^ que se conecta 
mediante un cable piano a la puerta para el usuario 
del BBC, junto con software en cassette o bien en 
disco. Con cste sistema se puede transferor la ima- 
gen de cuaiquier objeto o escena a la pantalla de su 
ordenador simplcmente impartiendo la instruction 
adecuada. El Snap se puede usar como mera diver- 
sion, pero tambien son posibles aplicaciones mas 
serias: el sistema podria ser la base de una alarma 
antirrobo i inteligente r, 1 o se podria utilizar para re- 
conocimiento de imageries, quiza incluso confiricn- 
dole "visidn" a un robot. 

El Snap opera en virtud de un fruco de la electro- 
nica. En el interior de la camara, detras de la lente, 
hay un chip de memoria RAM de 32 K. A difcren- 
cia de los chips normal es ? este se ha fabricado con 
una ventana transpa rente en su superfine superior. 
La imagen de la lente se centra en la superficie del 
dispositivo de silicio que conforma el chip, en el 
cual hay una matriz de 256 x 128 diminutas eel das 
de memoria. Est as celdas, al igual que las de cuai- 
quier otro chip, poseen una propiedad que suele 
ser "invisible" para el usuario. Cuando una celda se 
expone a la luz* pierde lentamente su carga almace- 
nada. y ia vetocidad a la cual se descaxga es propor~ 
cional a la imensidad de la luz que recibe. En la 
camara Snap, todas las celdas se cargan primero 
completamente escribiendo en todas las positioned 
de memoria un valor esperifico. "eneendiendolas" 
(poniendolas todas a ON). Al cabo de un breve pe- 
riodo, las celdas que reciben luz se descargan lenta- 
mente. Despues de una pausa, se vuelven a leer 
para evaluar el valor de cada una. Aquellas que no 
hay an recibido luz tendran to da via el mismo valor 
"encendido", mientras que aquellas que hay an es- 
tado expuestas a suficiente luz se habran descarga- 
do, modificando su valor almacenado, y, en conse- 
cuencia, se lee ran como "apagadas". El software 
del sistema traza un punto iluminado en la pantalla 
en una position que corresponde a cada celda "apa- 
gada" de la matriz de memoria. De este mode, se 
transfiere a la pantalla del BBC una reproduce ion 
de la imagen del chip. 

El periodo de tiempo que transcurre entre que el 
ordenador escribe todas las celdas de memoria para 
"encenderlas" y las vuelve a leer, determina la "ex- 



posicion" de la imagen. La camara Snap tiene capa- 
cidad para producir muchas tmagenes por segundo 
si la elimination resulta suficientemente brillan- 
te: con la iluminacion normal de una habitation 
se puede tomar una imagen en menos de un 
segundo^ 

La resolution de la imagen esta limit ada por la 
matriz de celdas de memoria de 256 x 128 del chip 
de la camara. La misma no es partieularrnente alta 
(es aproximadamente la misma que la pantalla del 
BBC en Mode 2 o Mode 5}, pero si proporciona 
una calidad de imagen muy razonable, comparable 
a la de la fotograffa de un periodico. Una restric- 
tion mas import ante en cuanto a la calidad no es la 
resolution si no que es consecuencia de otra carac- 
teristica del chip de memoria. La matriz de celdas 
esta ? en realidad, dividida en dos segmcntos se pa- 
rados en ia superficie del chip, Un agujero entre 
estos dos bloques significa que hay una franja a tra- 
ves del centro de la imagen que la camara no detec- 
ta, y, por lo tanto, la imagen resultant e en pantalla 
ticnc una pequena section que falta. Sorprcndentc- 



Im&genes mobiles EV1 

El software de fa camara Snap se 
denomina EVI. Vlsualfza 
continuamente en la pantalla lo 
que la camara «ve». Mimismo, 
permits vol car imageries anna 
impresora, congelarlas en 
pantalla o guardarlas en disco. 
El ordenador calcu la la 
exposiefdn adecuada, si bien 
esta se puede mod if i car de 
forma manual pursando las 

i teclas de flechas hacia 

1 arribay hacia abajo 
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i bo es demasiado grave y en muchas 

i totalmente desapercibido* 
l Soap se encuentra alojada en una pe- 
l piastica cuyo tamano es similar al de un 
de cigarrillos. En su parte frontal esta la 
leole t en k base hay una montura para tripode 
Z-t permite estabiltzar la unidad cuando 
se DBceatai exposiciones prolongadas. Dos metros 
de cable piano de ocho vfas concctan la unidad con 
la poena para el usuario del BBC, Este es todo el 
' ire que se requiere* 

:i".^ra utiliza una lente de la pequena cama- 
~- erlex Pentax 110 de una sola lente, instalada en 
una montura estandar de tipo bayoneta. Talcs le fl- 
ies se pueden adquirir con toda facilidad en tiendas 
it iniculos fotograficos y venden en una amplia 
variedad de longitudes focales (se pueden instalar 
hasta lentes zoom), de modo que la iente que se 
suministra se puede sustituir facilmente por otra. El 
ujiico problema de esta disposition es que la lente 
del sistema Snap esta colocada a una distancia del 
chip que es distinta de la distancia que guardaria, 
en la camara Pentax, respecto a la pelicula. Por 
consiguiente, las marcas de la distancia de enfoque 
de la iente no tienen ningun significado cuando se 
la utiliza con el sistema Snap, 

La imagen en pantalla producida por la camara 
depende en gran medida del software. Con el siste- 
ma se suministra un juego de programas y un ma- 
nual de tnstrueciones de 50 paginas (prcparado de 
forma muy profesional en un Apple Macintosh) 
que explica como se utiliza el software y los detailes 
relatives al funcionamienfo de la maquina* 

La camara se puede utilizar de dos form as dife- 
rentes. Es posible producir imagenes a partir de 
una unica imagen, lo que crea una visualization en 
pantalla de "dos tonos" ; tambien se puede compo- 
ner una imagen de "tonos multiples" tomando va- 
rias imagenes con expos ici ones distintas. El primer 
metodo lo em pie a el primer programa del software 
que se suministra; este utiliza una pequena seed on 
de pantalla en Mode 4 para pre sen tar una imagen 
constantemcnte actualizada. La expo sic ion se regu- 
la puis an do dos de las teclas para el cursor, Este 
programa incluye, asimismo, una rutina de vuelco 
de pantalla apta para impresoras Epson o compati- 
bles con la misma* 

El segundo programa permite construir image- 
nes mas re a list as en varios tonos. Se toman ocho 
imagenes cn distintas exposiciones, y est as se visua- 
lizan simultaneamente en una pantalla de Mode 0, 
urilizando el sombre ado para dar mas enfasis a las 
imagenes de exposition corta. El efecto de esto es 
nna imagen que contiene ocho grados distintos de 
brillo, de negro a bianco pasando por diversas tona- 
iidades de gris. Esto da un efecto mas realista, pero 
a la luz normal de una habitation la production de 
estas imagenes en "escala dc griscs" puede llevar 
hasta 10 segundos: no del todo una "instantanea"* 

El programa Secure convierte su sistema Snap en 
una alarma antirrobo inform at izada. El software 
toma nota solo de las diferencias entre imagenes 
sucesivas. de man era que puede colocarse de forma 
que produzca una senal de alarma cuando estas di- 
ferencias alcancen un determinado nivel. Por ejem- 
p!o, si la camara esta orientada liacia el exterior de 
su casa. ignorara el hecho de que los arboles sean 
metidos por ei viento. pero disparara la alarma si 
llega un visitante a la puerta de entrada. 

1230 



Cable hacia el ordenatfor 

Este cable conecta la camara 
Snap con la puerta para el 
usuario 



Cuerpo rJe la camara 



Anmo de enfoque 




Lente 

La camara viene equipada con 
una lente gran angular F2. 8 de 
18 mm, o una lente estandar de 
24 mm 



Movie almacena una corta secuencia de fotogra- 
mas de dos tonos, que se reproducen luego rapida- 
rnente, ere an do un efecto dc animacidn. Tambien 
se suministra un programa llamado Animal. Este es 
una version en video del conocido juego por orde- 
nador llamado Animates (vease p. 732). Para jugar 
a el el usuario debe present ar al sistema una imagen 
que contiene diversos objetos* EI programa analiza 
la imagen, tomando nota de los perfiles de los dis- 
tintos objetos que t4 ve"\ y luego in vita a I jugador a 
dar los nombres de cada uno. Si entonces el usuario 
dirige la camara hacia otra imagen o escena, esta 
intentara identificar cualquiera de los objetos que 
tambien hayan aparecido en la primera imagen/ 

Para los usuarios de ordenadores personales, tal 
vez la opcidn mas atractiva sea el programa deno- 
m in ado Arty. Este se utiliza para producir com- 
plejas imagenes en pantalla a partir dc otras distin- 
tas, Se emplea la pantalla de Mode 1 completa y las 
imagenes captadas por la camara se pueden posi- 
cionar en cualquier lugar de la pantalla, con tama- 
no ampliado o reducido, mediante el empleo de 




Camara Snap/Hardware 




RAM tiptrca 

El soporte foto sensible de la 
camara Snap es un chip de RAM 
dinamica descubierta. La luz que 
da en la superficle enciende o 
apaga bits individuates 



Chips controladores 



Placa de circuitos 



SNAP EV1 VIDEO 
Dimensiones: 

70 mmx50 mmx 
25 mm 

Lentes: Lentede 
24 mm ode 18 mm 
Interfaces: Conector 

de 20 vfas 

Manuales:G ufa para 
el usuario de la 
camara Snap 
Ventajas: Permite 
que el usuario guarde 
imageries en partial la 
o bien en disco 
Desvenfajas: La 
resolucidn es pobre, 
lo que en ocasEones 
dificulta el control de 
la camara 




Resolution vertical 

Las imagenes generadas par la 
camara Snap se forman 
comp etamente a partir de lineas 
verticals, con espacios para 
reflejar las variaciones en el 
brillo. La resolution de las 
imagenes es aceptable, pero 
dista mucho de ser excepcional 




una palanca de mando* Los colores de primer 
piano y fondo se pueden cambiar utilizando las te- 
clas de funcion. Para aprovechar al maximo este 
programa se necesita cierta dosis de paciencia, pero 
a partir de unos cuantos objetos de la vida real se 
pueden construir complejas pantallas a todo color. 
Si bien el software que se suministra es complejo 
y est a bien elaborado, cubre una gama de aplicacio- 
nes Hmitada. El programa de imagenes en escala de 



grises, por ejemplo, solo se puede emplear en 
Mode 0. Sena mas util una option para hacerlo en 
Mode 2, usando como tonos de gris los distintos 
colores disponibles en esa modalidad, En el manual 
se ofrcce una gran cantidad de inform ad on relativa 
a las rutinas en codigo maquina que utiliza el soft- 
ware, pero para hacer uso de las mismas se re qui e- 
re conocer dicho Ienguaje. El usuario de basic 
queda limitado al software suministrado. 



Distintos puntos de palidez 

Las imagenes de la camara Snap 
normaimente se visual izan en 
bianco y negro. Un programa de 
escala de arises denominado 
Grey permite visualizar una 
imagen a traves de toda la 
pantallaen ochc niveles de 
brillo. La acreeentadacapacidad 
para reflejar contrastes de 
ton alidades aumenta el re a I is mo 
dela imagen visualizada 
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Software/Graph Plan 



Haciendo planes 

Esta vez analizaremos el "Graph Plan», un paquete combinado de 
hoja electron fca y graficos creado para el BBC Modelo B 



A diferencia de los otros paquetes que hemos exa- 
minado en esta serie, Graph Plan es un programa 
basado en disco. Acorn regala el paquete. como 
parte de un con junto de software gratuito, a los 
compradores del segundo procesador Z80 (necesa- 
rio para el uso del paquete). Al iguai que todos los 
programas de este lote, Graph Plan es un paquete 
muy util y fiable. 

El programa no tiene tanto "estilo" como t\ Aba- 
cus de Psion, el paquete de hoja electronica. grafi- 
cos que reciben sin cargo alguno los usuarios del 
Sinclair QL (vease p. 1204). La ventaja sobre el 
Abacus reside en las rap i das velocidades de acceso 
y almacenamiento de que disfruta el software basa- 
do en disco. (Los microdrives del QL son adecua- 
dos si se esta acostumbrado al software basado en 
cassette, pero resultan dc una Jcntitud frustrante si 
uno esta habituado a utilizar una verdadera unidad 
de disco.) Puesto que Graph Plan es un paquete 
"de regalo'\ es seguro que gozara de popularidad, 
aunque no tanto, tal vcz, como el Abacus ^ porque 
el precio combinado del procesador Z80 mas las 
unidades Acorn es muy superior al del QL. 

En este capitulo concentraremos nuestra aten- 
cion en la vertiente de graficos de los mode los fi- 
nanciered Graph Plan, como su nombre sugiere. 
posee unas capacidades para graficos muy amplias, 
asi como una formidable matriz de formulas comer- 
ciales y matematicas incorporadas. 

Lo que k confiere al Graph Plan su in usual estilo 
es su original forma de comunicarse mediante nu- 
meros: toda la interaction del usuario con el pro- 
grama se realiza a traves de 144 instrucciones nu- 
meradas* Al cargarlo, el programa tiene una visua- 
lization de hoja electronica estandar (dividida en 
filas y column as) que ocupa la mayor parte de la 
pantalla, En todo el lado derecho de esta se visuali- 
zan las 20 instrucciones basicas con sus numeros. El 
usuario selecciona una instruccion y digita el nurne- 
ro cuando asi se le solicita en la tercera line a de 
estado, encima de la visualization, mediante el 
mensaje ENTER COMMAND (entre instruccion). 

A pesar de que seleccionar una instruction (ya 
sea desde el menu en pantalla o bien de la lista 
completa de instrucciones del excel ente manual del 
Graph Plan, de 124 paginas) es suficientemente 
sencillo, esta forma de hacer las cos as tiene desven- 
tajas obvias. La mayor parte de los paquetes de 
modelos, cn especial los que nan obtenido tanto 
exito, como el Lotus 1-2-3 (vease p. 1124), exigen 
que d usuario entre solamente la letra initial de 
una instruccion (o que la seleccione en una visuali- 
zacidn mediante las flechas del cursor). 

Los paquetes de modelos sofisticados, como el 
Lotus 1-2-3, visualizan explications sobre la fun- 
cion de eada instruccion, Graph Plan, por el con- 
trario, da por sentado que el usuario cornprende la 
fimtion dc tod as sus instrucciones. No obstante, el 



programa si proporciona La facilidad para alterar la 
lista de instrucciones a la derecha de la pantalla, de 
modo que el usuario puede confectionar la lista 
mas utii para el. Si, por ejempkx se selecciona la 
instruction numero 2 data, el menu de instrucciones 
pasa a visuaJizar las instrucciones de la 29 a la 48 
{las instrucciones para entrada y manipulation de 
datos) . Existe asimismo una facilidad HELP (ayuda) 
(instruction numero 7) que ofrece la explication de 
la funcion de la instruccion dada. 

Ademas del sistema dc instrucciones numeradas, 
Graph Plan posee otras caractensticas exclusivas. 
La mayoria de las hojas electronicas, por ejemplo, 
se basan en el concepto de "celda": una intersec- 
tion entre una fila y una columna. Graph Plan trata 
las filas y las columnas como entidades separadas, y 
el "puntero de datos" es un indicador de cursor 
que, ademas dc visualizar la identidad del cuadrado 
al que esta apuntando el cursor, indica si se esta en 
modalidad de fila o de columna. 

Esta distincion careceria de significado en un sis- 
tema en el cual la direction de celda individual 
fuera el punto central de referenda, pero en el 
Graph Plan reviste una en or me importancia, por- 
que los graficos se dibujan con referenda a filas o 
bien a columnas, pero no a ambas. Para indicar al 
paquete si se desea generar un grafico basado eri 
fila o basado cn columna. debe establecerse la mo- 
dalidad correct a cambiando el puntero de datos. 
Esto se realiza pulsando las teclas con flecha, para 
desplazar el cursor hasta el encabezamiento de una 
fila o de una columna, lo cual automaticamente es- 
tablece la modalidad correspondiente, 

Un modelo sencillo 

A modo de ilustraci6n de la tecnica para dibujar 
grafica s del paquete, vamos a considerar un mode- 
lo sencillo- Posee einco columnas, rotuladas de 
"Enero" a "Mayo", respect ivamente, y einco filas, 
denominadas "Ventas", "Costes de ventas", "Be- 
neficios brutes", "Gastos generales ,; y "Beneficios 
netos". En un modelo como este, una grafica basa- 
da en filas tendra un significado dife rente al de una 
grafica basada en columnas. Por ejcmplo, podria- 
mos generar un grafico de b arras muy sencillo basa- 
do en filas para las cifras del movimiento total de 
ventas para los meses de enero a mayo. 

El grafico visualizan a los titulos de las columnas 
(de "Enero" a "Mayo") a lo largo del eje y las 
b arras representanan los valores dados en la fila 
uno del modelo. Por el contrario, situando el pun- 
tero de datos en la modalidad de columna, podria- 
mos generar una grafica de barras muy distinta, 
Esta visualizan a los titulos de las filas ("Ventas", 
"Coste de ventas", etc.) a lo largo del eje x 7 con las 
barras representando los valores dados en la colum- 
na uno ("Enero") del modelo. 



1232 




Graph Plan/Software 




Con los datos apropiados. Graph Plan puede 
producir instant aneamente una canndad considera- 
ble dc graficos diferentes a partir de los datos sumi- 
nistrados en este modelo, Todos estos aiaficos se 
pueden ver, a su vez, en la pantalla- sin ninguna 
intervention por pane del usuario. Graph Plan per- 
mite hacer esio mediaine la utilization de la ins- 
tru: : - it z: :2 rE_EC"T. Entrando 62 en res- 
puesta al meosaje ENTER COMMAND se genera otro 
meosaje en la Knea de estado tres. Si usted se halla 
ea "modaSrfad fila~\ por ejemplo, se le solicitara 



sion" muy bueno, que ilustra claramente el proceso 
de selection que ha de segutrse cuando se utiliza 
esta instruccion. La instruction 63 le presenta en 
pantalla un menu de seis opciones: Display Chart, 
Define Chart Options, Define Axes Options, Define Pie 
Options, Print Chart y Plot Chart (visualizar diagrama, 
definir opciones del diagrama, definir opciones dc 
eje, definir opciones de tarta, imprimir diagrama y 
trazar diagrama). Ademas, el manual posee un 
apendice especial, titulado u Guia de los submenus 




que de el numero de la fila de datos que desea re- 
present ar graficamente. Apenas acaba de selectio- 
ns r la fila ? el mensaje cambia y pasa a solicitarlc 
que tipo dc grafico desea: "Chouse (Bar=1 , Line=2, 
Pie=3)" (Elija: De barras=l, De linea=2, De 
tarta=3). Entonces puede contemplar inmediata- 
mente el grafico seleccionando la instruccion 61 
DISPLAY. Y puede pasar dc graficos dc barras a gra- 
ficos de hneas o en forma de tarta a voluntad. 

Si desea mas flexibilidad en el trazado y el diserio 
de un grafico, puede emplear la instruccion 63 OP- 
TIONS. El manual visualiza un u diagram a de deci- 



para graficos", que es de lectura obligada para el 
usuario novel. En el se explica sucintamente como 
se pueden agregar titulos en un grafico, seleccion ar 
las tonalidades o el color de graficos de barras, y 
realizar toda clase de variaciones de escala (hasta 
hacer los ejes logaritmicos en vez de lineales). 

Una buena facilidad para graficos incorporada 
en forma de hoja electronica (que posee fun ci ones 
matematicas y estadisticas) hace que el Graph Plan 
sea apto para una amplia gam a de apHcacioncs 
cientificas y de ingenieria relativamcntc scncillas. 
El paquete proportion a un medio excelente para 
presentar datos, ya sea para informes o para confe- 
rencias, y, por consiguicnte, les agradara tanto a los 
tecnicos y a los cientificos como a los usuarios co- 
merciales. 



Visualization de hoja 
eleotr6nica 

Graph Plan se diferencia de las 
otras hojas electronicas en dos 
aspectos. El primero de ellos es 
el menu de instrucciones 
numeradas, a la derecha de la 
pantalla. El segundo es la 
cap acid ad de tomar datos de 
la hoja electronica y 
presentar I os en forma 
grata. Graph Plan 
puede visualizar datos 
de una fila o de una 
columna en tres 
formates 

diferentes, como vemcs 
en las fotog raffas 



1233 



Poesi'a en movimiento 



En este capitulo centraremos nuestra atencion en el tratamiento 
de listas, fundamental para la forma en que opera este lenguaje 



Una lista es un conjunto ordenado de objetos. y en 
logo se identifica mediante la utilization de corche- 
tes; de modo que [CEIWN MADRAS VINDALOO] es 
una lista, En esta serie ya nos hemos encontrado en 
varias ocasiones con listas. De hecho. en logo no 
podemos prestindir de ellas, porque es un lenguaje 
basado en listas. Ya hemos visto como una defini- 
tion para un cuadrado (REPEAT 4 [FD 50 RT 90]) 
posee una lista de instrucciones (encerradas entre 
corchetes) como su segunda entrada. Del mismo 
modo, MAKE "ENT REQUEST le asigna a ENT una lista 
compuesta por la entrada desde el teclado. 

Se pueden asignar listas a variables locales: por 
ejemplo, MAKE "CURRY [CEILAN MADRAS VINDA- 
LOO], La instruction PRINT :CURRY imprime la lista 
sin los corchetes: CEILAN MADRAS VINDALOO, 

En logo, un objeto puede ser un numero, una 
palabra o una lista, y esta ultima se define simple- 
mente como un conjunto de objetos, Esta, por su- 
puesto, es una definition recursiva; una lista puede 
contener otra lista, o una lista de listas, y asi sucesi- 
vamente. [[POLLO TIKKA] NAN ENSALADA] es una 
lista valid a, teniendo como primer elemento una 
lista ([POLLO TIKKA]) . Los procedimientos recursi- 
vos suelen ser necesarios para procesar listas, preci- 
samente porque estas son objetos recursivos. 

La mayor parte de nuestra program acion en 
logo ahora se ha refer jdo a un numero o una pala- 
bra cad a vez. Cuando deseamos procesar grupos de 
objetos simultaneamente, necesitamos organlzar 
estos objetos simples en una unica unidad* El logo 
tiene en la iista su metodo basico para agrupar 
objetos simples. La election de esta se debe a que 
es muy versatil: partiendo de una lista se puede 
crear cualquier organ izacion compleja de datos. 

Las dos operaciones de lista fundamentals son 
FIRST y BUTFIRST. FIRST [CEILAN MADRAS VINDA- 
LOO] produce CEILAN, cs decir, nos da el primer ele- 
mento de la lista. BUTFIRST [CEILAN MADRAS VIN- 
DALOO] produce MADRAS VINDALOO; en otras pala- 
bras, nos la proporciona sin su primer elemento, 

He aqm un procedimiento que imprime los ele- 
mentos de la lista, uno debajo del otro: 

TO IMPRIMIR IISTA 

PRINT FIRST :LISTA 

IMPRIMIR BUTFIRST : LISTA 
END 

De modo que IMPRIMIR [CEiLAN MADRAS VINDA- 
LOO] nos da: 

CEILAN 

MADRAS 

VINDALOO 

La primera instructi6n imprime el primer elemento 
y despues pasa la tarea de imprimir el resto de la 
lista de entrada a otra copia del procedimiento IM- 
PRIMIR. Cuando ejecute este procedimiento, al 



acabarse los datos obtendra un mensaje de error. 
Esta es una forma mas elegante de terminar: 

TO IMPRIMIR LISTA 

IF EMPTY? IISTA THEN STOP 

PRINT FIRST :LISTA 

IMPRIMIR BUTFIRST IISTA 
END 

EMPTY? (^vatia?) verifica si su entrada es la "lista 
vatia": []> Aigunas versiones MIT no posee n la pri- 
mitiva EMPTY?, pero dsta puede definirse asi: 

TO EMPTY? IISTA 

IF IfSTA = []THEN OUTPUT TRUE 

OUTPUT "FALSE 
END 

Similares a FIRST y BUTFIRST son LAST y BUTLAST. 
LAST [CEILAN MADRAS VINDALOO] produce VINDA- 
LOO, y BUTU\ST [CEILAN MADRAS VINDALOO] pro- 
duce CEILAN MADRAS. 

Para nuestra primera exploraci6n del tratamien- 
to de listas, intentaremos imitar algunos balbuceos 
al azar en el divan del psicoanalista. Primero Ie 
asignaremos a la variable PALABRAS todos los voca- 
bios que conocemos: 

MAKE "PALABRAS [MADRE PADRE SEXO 
ASESINATO CELOS FUEGO MAR MUERTE SUENO] 

Queremos producir un flujo constante y al azar de 
estas palabras, porque la experiencia nos ha demos- 
trado que son estos los vocablos que siempre resul- 
tan utiles para captar la atencidn del psicoanalista. 

Pete obtener un elemento aleatorio necesitamos 
seleccionar un numero al azar, 11 , entre uno y la 
Ion git ud de la lista (nueve, en este caso) y luego 
seleccionar el enesimo elemento de esta. 

TO ENE :N0 IISTA 

IF :N0=1 THEN OUTPUT FIRST IISTA 
OUTPUT ENE :N0 1 BUTFIRST : LISTA 

END 

Vamos a utilizar este procedimiento en algunos 
ejemplos, para ver c6mo funciona, Supongamos 
que usted digita ENE 1 : PALABRAS. La condition de 
la primera line a es verdadera, de modo que el pro- 
cedimiento produce FIRST : PALABRAS, que en nues- 
tra ejemplo es MADRE. 

Pruebe con ENE 2 ; PALABRAS: ahora la condici6n 
es falsa, de modo que el procedimiento produce 
ENE 1 BUTFIRST : PALABRAS. Este ignora el primer 
elemento de la lista y toma la primera palabra del 
resto de la misma: PADRE. 

De manera que nucstro procedimiento para im- 
primir al azar una palabra do nuestro limitado voca- 
bulary o seria: 

TO TOMARALAZAR LISTA 

OUTPUT ENE ((RANDOM 9)+1) LISTA 
END 



Para utilizarlo, digite TOMARALAZAR :PALABRAS. 

Nuestro procedimiento esta restringido a listas 
de nueve elementos, Podriamos mejoraifo si pudie- 
ramos determinar cuantos hay en una iista detenni- 
nada. Este es un procedimiento que realiza eso: 

TO LONGiTUD IISTA 

if empty? ustathen output 0 
:.*=."- - 5_~rst iista 



Poesia ateatoria 



Abreviaturas 



tunciona, pmebe con: LONGITUD 
fdENQA FICCION]. Como la Iista contiene algunas 
palabras* la condicion fraeasa, de modo que el pro- 
cedimiento produce 1 + LONGITUD [FICCION]. 
Ahora LONGITUD [FICCION] produce 1 + LONGITUD 
[]. Al llamar a LONGITUD con una entrada de [], la 
condicion de la linea 1 es verdadera, por lo que el 
procedimiento produce 0, Ahora LONGITUD [FIC- 
CION] produce 0 + 1 = 1 v finalmente LONGITUD 
[CIENCIA FICCION] produce 1+1=2. Por lo tanto, 
un procedimiento mas general para tomar palabras 
al azar de una Iista de cualquier longitud seria: 



TO TOMARALAZAR IISTA 

OUTPUT ENE ((RANDOM LONGITUD 

+1) :LISTA 
END 



LISTA) 



Muchas versiones de logo poseen una primitiva. 
ITEM, que hace exactamente lo que hace ENE, y una 
primitiva denominada COUNT que realiza lo mismo 
que LONGITUD. Utilizando estas primitivas, pode- 
mos reescribir el procedimiento: 

TO TOMARALAZAR IISTA 

OUTPUT ITEM ((RANDOM COUNT IISTA) 

+1) :LISTA 
END 

Para imprimir una seleccion de 10 terminos que 
hagan que su psicoanalista se mantenga atento, 
simplemente digite: 

REPEAT 10 [PRINT TOMARALAZAR : PALABRAS] 

Existe no patron para estos programas procesa do- 
les de listas que ban compartido muchos de nues- 
tros pfocedfamentos reperitivos para graficos tortu- 
ga. Este patron es: 



• Si la tarea a realgar es may senriHa- entooces 
hagala y detengase. 

• De lo contrario, efectue una pequena pans de la 
tarea. 

• Despues pase el resto de la tarea a otro procedi- 
miento (con frecuencia una copia del procedimien- 
to original), 

Existe una estrategia que ofrece elevados percen- 
tages de exito T con la cual nos encontraremos reite- 
radamente en los programas de tratamiento de lis- 
tas. Compare este programa para dibujar poli- 

gonos: 

TO POLI :N 

IF :N = 0 THEN STOP 

FD 30 RT (360/;N) 

POLI :N - 1 
END 

con la version de IMPRIMIR que ofrecimos anterior- 
mente. La estructura de ambos procedimientos es 
identica. 



Despues de no haber logrado impresionar a nues- 
tro psicoanalista, ahora dedicamos nuestro esfuer- 
zo a la poesia. Aqui produciremos f rases completas 
en lugar de palabras individuates. 

TO P0EMA1 :L0NGITUD 
IF 10NGITUD = 0 THEN PRINT "STOP 
(PRINT1 " T 1 TOMARALAZAR ;PALABRAS) 
POEMA 1 10NGITUD - 1 

END 

PRINT1 <lh ' se incluye para imprimir un espacio 
entre cada palabra, Para utilizar este procedimien- 
to digite P0EMA1 6 para una frase de seis vocablos. 

Seria util poder ampliar nuestra Iista original de 
palabras sin tener que tomarnos el trabajo de vol- 
verla a escribir entera. Una manera de lograrlo es a 



BUTFIRST 
BUTLAST 
SENTENCE 



BF 
BL 

SE 




Canta la Tortuga Artificial 

He aqui un extracto de la 
cancion de la Tortuga 
Artificial, personaje del 
fa mo so cuento Alici3 en ef 
Pats de (as Maravitias, de 
Lewis Carroll, El patron rje la 
metrica, un poco difictl de 
obtener en una poesia 
generada por ordenador, esta 
adaptado de una antigua 
cancion popular de origan 
negro 



"l?or qu^ no vas mas aprisa?" f \b dijo una pescadilla 
aun caracoL 

;i Tras nosotros viene, muy cerca, un delfm pisandome 
la cola. 

jFfjate cuan raudas las langostas y las tortugas 

arvanzan todas! 
Esfcan esperanoofios sobre eJ cascajo. ^No querns venir 

y uai tar larriDfcn . 

Guerras. que mas, querras, querrias, 

^no querras tu bailar tambien? 
Querras, querrias, querras. querrias. 

lJ\o querrias tu tambien bailar? 

'No sabes, no puedes saber, cuan agradable es el 
vaiv£n 

cuan do levantandonos nos arrojen con las langostas 
jhacia el mar!" 

Pero el caracol respondia: "jMuylejos! jDemasiado lejos!' 

y ni se dignaba mirar a donde. 
Dijo que le agradecia a la pescadilla la invitacion, 
pero que at baile no se uniria. 
No querria, no podria, no querria, no podria, 

no querria bailar tambien. 
No querria, no podria, no querria, no podria, 
no podria tambien bailar, 
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traves de la utilization de la operation SENTENCE 
(frasc), que toma dos entradas y elabora con ellas 
una lista. De modo que SENTENCE "MERMELADA 
[JARRA MIELJ produce [MERMELADA JARRA MIELJ. 

TO AGREGARPALABRAS1 LISTA 

MAKE "PALABRAS SENTENCE :LISTA : PALABRAS 
END 

De manera que ahora podemos ampliar PALABRAS 
mcdiante AGREGARPALABRAS [ANSIEDAD REPRE- 
SION [MIEDO A VOLAR]]. Pero se nos presenta el 
problema de que a la variable PALABRAS no se le ha 
asignado prcviamente ningun valor. Para obviar 
este contraticmpo se utiliza la primitiva THING?, 
que verifica si a una variable se le ha asignado algun 
valor; produce verdadcro (true) si su entrada tiene 
algiin valor asignado. Ahora podemos incrementar 
nuestra lista mediante AGREGARPALABRAS1: 

TO AGREGARPALABRAS1 1ISTA 
IF NOT THING? "PALABRAS THEN MAKE 
"PALABRAS [] 

MAKE "PALABRAS SENTENCE :LISTA : PALABRAS 
END 

Empleando una lista de palabras diferente, obtuvi- 
mos la siguiente "poesfa" aplicando este procedi- 
miento: 

APARICION RUIDOSAMENTE HABLO ESPLENDIDO 
PARANOICO PLANETA ATERRORIZADO LA CON 
VERDE APARICION FLOTANDO PARANOICO ROBOT 
HOMBRE VOLO HABLABA FLOTANDO 
RUIDOSAMENTE 

Uno de los defectos mas evidentes de nuestra poe- 
sfa mformatizada es su ignorancia total de la grama- 
tica + Los poemas podrian tener mas scntido si pu- 
diesemos ceriimos a aigunos patrones sintacticos 
simples, tales como: sustantivo, verbo, sustantivo, 
Una forma de haccr esto consiste en tener varias 
list as, una para cada parte de la oracion. Entonces 
podriamos elegir una palabra de cada lista segun la 
estructura que desearamos para la frase. 

Vamos a dejar este problema para que lo investi- 
gue usted mismo. En el proximo capPtulo del curso 
le ensenaremos algunas maneras de mejorar las ap- 
titudes de la tortuga para escribir poesia. 
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Respuestas a los 
ejercicios 

Respuestas a los ejercicios de p. 1217: 

1 . Caiculo de potencies: 

TO POTENCIA :A:N 

IF NOT ((INTEGER :N)=:N) THEN PRINT [SOLO 

INDICES DE NUMEROS ENTEROS] STOP 

JF :N=0 THEN OUTPUT 1 

OUTPUT :A* POTENCIA :A :N - 1 
END 

2. Conversion a hexadecimal: 

TOIMPRESION.HEXA:N 



IF 


N 


< 10 THEN OUTPUTS 


IF 


N 


= 10 THEN OUTPUT "A 


IF 


N 


= 11 THEN OUTPUT "B 


IF 


N 


= 12 THEN OUTPUT "C 


IF 


N 


= 13THEN OUTPUT h D 


IF 


N 


= 14 THEN OUTPUT "E 


IF 


N 


= 15 THEN OUTPUT "F 


END 







TO HEXA :N 
IF :N = 0 THEN STOP 
HEXA QUOTIENTS 16 

PRINT1 IMPRESION.HEXA REMAINDER :N 16 
END 

3. Comprobarsiunnumeroespar: 

TOPAR?:N 

IF ((REMAINDER :N 2)=0)THEN OUTPUT 

"TRUE OUTPUT "FALSE 
END 

4. Hallar una superficie utilizando el mGtodo Monte 
Carlo: 

TOMC 

DRAW PU MAKE IN 0 

MC1 1000 10100 

(PRINT [LA SUPERFICIE ES] (:IN)) 
END 

TOMC1 :N:XN :YN 

IF :N=0 THEN STOP 

PUNTO.ALEAT0RIO :XN :YN 

IF DENTRO? THEN MAKE "IN :IN+1 

MC1 :N - 1 :XN :YN 
END 

TO PUNTO.ALEATORIO :XN :YN 

SETXY RANDOM :XN RANDOM :YN 
END 

TO DENTRO? 

IF YC0R< XCOR'XCOR THEN OUTPUT 

"TRUE OUTPUT "FALSE 
END 



Juegos J 



Squash 



I Por que no hacer un poco de deporte ante su pequeha pantalla? 
Esta version de «Squash» ha sido escrita para el microordenador 
Thomson TO 7 



Gracias a su ordenador, pucdo jugar a squash co- 
modamente sentado en un silldn. La raqueta se 
desplaza con la ayuda de la palanca de man do o de 
las teclas Q, S y la baira espaciadora. Dispone dc 
diez pelotas que ha de mantener en juego el mayor 
tiempo posible. Cada pelota que se devuelve pro- 
porciona un punto. 




10 REM ********** 
20 REM * SQUASH * 
30 rem""****** 
40 CLEAR „2 
50 G0SUB 660 
60 GOTO 180 

70 D=2* ((STICK (0) = 7}- (STICK (0)=3)) 

80 IFDoO THEN D0=D 

90 IFSTICK(0)-0UHEN D0=0 

100 RX-RX+DQ 

110 RETURN 

120 D$=INKEYS 

130 D=2* ((D$="Q"HDS="S"]) 

140 IFDoO THEN D0=0 

150 IF D$=N$ THEN DO-0 

160 RX=RX+D0 

170 RETURN 

180 LOCATE BX,BY 

190 COLOR 3,6 

200 PRINT NS; 

210 BX=BX+0X 

230 BY=BY+DY 

230 LOCATE BX.BY 



ASS (BX-RX-3) >1 THEN m 
•S=S-M:BeP:DY=-DY 
BffiW— DY 

= -'-z =■===-:* = -:■« 



310 ]FRX>33T>eiHX=33 

320 LOCATE RX.RY 

330 COLOR 2 

340 PRINT RS; 

350 GOTO 180 

360 NB=NB+1 

370 IFNB-11 THEN 480 

380 LOCATE BX, BY 

390 PRINT N$; 

400 FOR 1-1 TO 3 

410 BEEP 

420 FOR J = 1 TO 100 
430 NEXT J 
440 NEXT I 
450 00=0 
460 G0SUB940 
470 GOTO 180 
480 LOCATE 13,5 
490 COLOR 0 

500 PRINT L 'PUNTUAC4QN :";S; 

510 IFS>R1 THEN R1=S 

520 LOCATE 13,10 

530 PRINT "RECORD :";R1; 

540 LOCATE 13,15 

550 PRINT 'OTRA T\ 

560 NB=0 

570 S-0 

580 DS-INKEYS 




590 IFDSo" " THEN 560 

600 DS=INKEY$ 

610 IFU$=' " THEN 600 

620 IFD$<>"N" THEN 50 

630 SCREEN 4,6.6 

640 CLS 

650 END 

660 CLS 

670 SCREEN 1,6,6 

680 ATTRB1J 

690 DEFINT A-Z 

700 DEFGRS (0)=255,255,255,0,0 F O,0 > O 

710 DEFGRS (1 )=24. 1 26,1 26,255,255, 1 26,1 26,24 

720 N£=CHRSf32) 

730 LOCATE 1.10,0 

740 PRINT 'JOYSTICK (SoN)?"; 

"5: vr-s 

JED FDS= # ~T}O<750 

770 f DS=*S"TlB4JS^taSEJS=2 

780 as 
790 ATTRB 0,0 
800 COLOR 6.1 
810 F0RBX=1T038 
820 LOCATE BX r 0 
830 PRINT MS: 
840 NEXTBX 
850 FORBY-1 TO 22 
860 LOCATE 1, BY 
870 PRINT NS: 
880 LOCATE 38, BY 
890 PRINT MS; 
900 NEXT BY 

910 R$=N$+NS+GRS (O)-GRS (0}+GRS (G) + NS+N$ 
920 B$=GfiS(1) 
930 RX=16 
940 RY=23 
950 BY=22 

960 BX=INT(RN0*34)+3 x 
970 DY=-1 §Q 
980 DX = (INT(RND*2)-0.5)*2 «> 
990 RETURN © 
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A prueba de error 



Vamos a poner un ejemplo de diseho de arriba abajo ("top- 
down"): un programa en assembly para depurar y poner a punto 
otros programas («debugger») 



B 


inserts r Punto de Rupkira 




(breakpoint) 


... 


eliminar Punto de Ruptura 




(ifri-insert} 


0 


visualizar (tfsplay) Puntos de 




Rupiura en ctjrso 


S 


comenzar (Sari) ejecucidri 




programa 


G 


' ir {Go). fleemprender ejecucitin 




programa 


R 


visualizar contenido flfeflisiros 


V 


inspeccionary camber position 




<fe Atemorta 


D 


salir{Ojit) 



Veamos primeramente las fases de especificacion y 
diseno de que se compone la obtencion de un elimi- 
nador de errores. La especificacion es bastante in- 
mediata; ya tuvimos ocasion de considerar ias fun- 
ciones que suponemos se iricorporaran en el pro- 
grama (vease p. 1219). 
Inputs del programa: 

1. Un programa a depurar: Supondremos que ya 
esta cargado en la memoria, junto con el depu- 
rador. 

2. Ordenes: Debemos decidir si las ordenes se in- 
troduction directamente o por medio de opciones 
de menu. Entraremos ordenes de un solo caracter 
segtin la tabla al margem 

3. Direcciones: Como pueden ser introducidas en 
hexadecimal , habra que convertir una cadena dc 
digitos hexadccimales ASCII en numeros binarios 
de 16 bits. 

Outputs del programa: 

1. <l Ecos" de los caracteres entrados: Tengase en 
cuenta que por el hecho de apretar una tecla no se 
obtiene un caracter en la pantalla. El ordenador 
debe ser program ado para que baga eso. 

2. Ntimeros de 8 y 16 bits: Son aceptados en forma 
de cadenas de numeros he xadeci males, 

3. Cadenas: Que sirvan como etiquetas de los nu- 
meros anteriores. 

Hay muchas form as de dividir un programa en mo- 
dulos y estos en subrutinas. pero siempre debe pro- 
porcionarse un modulo ^extemo" que sirva de ca- 
parazon (shell) o enlace de los rest antes. En nues- 
tro programa este modulo tomara la siguiente 
forma: 

Modulo principal 

Data: 

Direction de initio del programa (16 bits) 
Aviso para la antrada de ordenes (el caracter ASCII 

individual '>') 
Caracter de Orden, esta en ASCII y es individual 

fcusaremos caracteres en minuscufa?) 
Direction de Ruptura, es ia direction de la rutina 

administradora de la interruption SWI 

Proceso: 
Establecer la Interruption 
GET (tomar) la Direccidn de I nick) 
REPEAT 

DISPLAY aviso 
REPEAT 

Tomar la Orden 
UNTIL que fa Orden sea valida 
DISPLAY la Orden (eco) 
JF Orden = '8' THEN 



Insertar Punto de Ruptura 
ELSE IF Orden = l U r THEN 

Eliminar Punto de Ruptura 
ELSE IF... 

Hastaque Orden = "Q : 
Fin del modulo principal 

Con esto ya se tiene una buena idea de las rutinas 
que haran falta. No es lo mismo un modulo que 
una rutina. Hay varias rutinas que pueden agrupar- 
se logicamente por compartir los mismos dates; por 
ejemplo, un modulo en nuestro case tratara los 
puntos de ruptura. La fase siguiente muestra como 
es posible disenar este modulo; 

Modulo de rupturas 

Data: 

Tabfa-Puntos-Ruptura es una matriz de direcciones de 
16 bits que almacenara las direcciones de los 
puntos de ruptura 

Valores-Sustituidoses una matriz de valores de 8 bits 
relativos a la tabla anterior. Aqui pueden 
almacenarse los opcodes que son sustituidos por 
una instruction SWI en el punto de ruptura 

Numero-Puntos-Ruptura es un valor de 8 bits que da 
el numero de puntos de ruptura activos 

Punto-Ruptura-Siguiente es un valor de 3 bits, 
que contiene el siguiente punto de ruptura 
segun avanza la ejecucidn 

SWMJpcode es un opcode de 8 bits para la 
instruccion SWI 

Proceso 1: insertion Puntos-Rupfura 

IF Numero-Puntos-Ruptura < MAX THEN 
Tomar-Direccidn 

Anadir 1 a Numero-Puntos-Ruptura 
Almacenar Direccidn en Tabfa-Puntos-Ruptura 
(Ndmero-Puntos-Ruptura) 
ENDIF 
Fin del proceso 1 

Proceso 2: Establecer-Punto-Ruptura (N) 

(N nos dira cual de los puntos de la tabla ha de ser 
activado) 

Tomar-Direccion en Tabla-Puntos-Ruptura (M) 
Tomar el Opcode contenido en esa Direccidn 
Almacenarlo en Vafores-Sustituidos (N) 
Almacenar el Opcode SWI en Direccidn 

Fin del Proceso 2 

El Proceso 2 se encuentra en una fase en la que 
podnamos empezar a codificar. Cuatro son los va- 
lores de datos que han de ser mampulados: N, el 
para metro indicador del punto de ruptura que hay 
que usar, es un numero de 8 bits que emplearemos 
como desplazamiento en las dos tablas y que oscila- 
ra entre uno y Numero-Puntos-Ruptura— L Note- 
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se, sin embargo que una tabla toma valores de 16 
bits mientras la otra los toma de 8 bits. Asumire- 
mos que N es pasado en A. La direction del punto 
de ruptura tomada de dicha tabla se introducira en 
X. El opcode sustitutdo sera llevado a B para su in- 
troduction en la tabla VaJor^Sostitrados, Asi B 
puede ser empleado para colocar el opcode SWI en 
la direccion apropiada. 

Proporcionamos aquf la codmcadon final del 
Proceso 2 (Modulo E^tablecer-Piinto-RupEura); la 
siguiente tarea consistira en disefiar on modulo 
para manejar las entradas y salidas. De lo que lle- 
vamos dicho, se puede colegir que existen drferen- 
tes tareas de E S a ejecutar por el programa, Por el 
momento. asumiremos la existencia de dos subruti- 
nas: INCH, encargada de introducir un caracter indi- 
vidual en el regis tro A a partir del teclado; y OUTCH, 
que enviara el caracter desde A hasta la posicion de 
la pantalla que indtque el cursor. Este modulo re- 
quiere las siguientes subrutlnas: 

1 . TomarOrden: Bitra desde el teciado la orden 
siguienle. 

2. TomarOireccion: Toma dei teciado una direccion 
hexadecimal de 1 a 4 caracteres de Jongrtud, 

3. TomarValor:Toma un valor hexadecimal de 1 o 2 
caracteres de longitud para modificar el valor de una 
posicion de memoria. 

4. VisualizarVaforiVisualiza en pantalla un valor 
hexadecimal de dos caracteres. 

5. VisualizarDireccion: Visualiza en pantalla una 
direccion hexadecimal de cuatro caracteres. 

Nuestro enfoque muestra la diferencia cnfre los 
metodos dc programacion de arriba abajo (top- 
down) y dc abajo arriba (bottom-up). El primero 
puede llcvarnos a definir y codtficar estas operacio- 
nes de mancra independiente, acabando por escri- 
bir rutinas separadas que csencialmente hacen la 
misma cosa. 

El metodo ascendente puede ahorrarnos tiempo, 
espacio y esfuerzo, al cscribir sencillamente unas 
cuantas rutinas utiles que emplearemos en distintas 
circunstancias. 

Estas rutinas son: 

GETC&Entrar un caracter individual en A, 
comprobandolo en una fista de caracteres validos (letras 
de orrJenes o digitos hexa) t hacienda ef eco de los 
caracteres validos e ignorando los restantes. 
GETHX2;Sirve para que GETCH tome dos digitus teeay 
los convierta en un numero de ocho bits, 
GETHX4:Toma cuatro digitos hexa y forma un numero 
de 16 bits. 

PUTHEXiVisualiza un numero de 8 bits como dos digitos 
hexa (puede ser llamada dos veces para que visualice un 
numero de 16 bits). 

PUTCR:Para sacar un caracter de retorno de carro (o 
retorno de carro y safto de Ifnea si es necesario), 

Cada una de estas rutinas nan de ser desarrolladas. 
Considcremos primero el diseno dc GETCH. 

La rutina GETCH 

Data: 

Car-lnes un caracter ASCII entrado desde teciado 

tcontenido en A) 
Car- Validos retiene la direccion de 16 bits de la tabla 

de caracteres validos 
Numero-Gar- Vales un valor de 8 bits 



Car-lnspec es un contador de 8 bits 
Proceso: 
REPEAT 
Tomare! siguiente Car-ln 
Pone r Car-lnspec a (Mumero-Car-Val-I) 
While Car- Validos (Car-lnspec) <> Car-ln 
ANDCar-Jnspeo =0 
DecrementarCaMnspec 
Until Car-lnspec> = 0 
DISPLAY Car-ln 
Para codificar esto, dcbcmos cm pi car A para alma- 
cenar Car-ln, y el valor de 16 bits dc Car- Validos 
puede ser pasado y guardado en X. En B puede ser 
pasado Numero-Car-Val, pero necesita una mayor 
permanencia, lo que conseguiremos llevandolo a la 
pila. En este caso podemos emplear B para Car- 
Inspec. Observe que B devolvera el desplazamiento 
a la tabla, lo que sera util para interpretar las orde- 
nes y para la conversion hexadecimal. 

He aqui la forma final dc esta rutina codificada. 
En la siguiente lection desarroilaremos las restan- 
tes rutinas necesarias para el modulo de entrada- 
*alida. 



Rutina GETCH 



GETCH 


PSHS 


B 


Salva B 


REPTOO 


BSR 


INCH 


Toma el siguiente Car-ln 




LDB 


i,s 


Activa Car-lnspec 




DECB 




Resta 1 del desplaz. maximo 


WHIL00 


BLT 


ENDWOO 


Mientras Car-Inspec>=0 




CM PA 


B,X 


AND 




BEQ 


ENDWOO 


Car-InoCar-Validos(Car- 
Inspec) 




DECB 




Decrementa Car-lnspec 




BRA 


WHILOO 




ENDWOO 


TSTB 






UNTLOO 


BLT 


REPTOO 


Hasta que Car-Inspec>=0 




BSR 


OUTCH 


Visualiza Car-ln 




LEAS 


1,S 


Incrementa S para "olvidar" 




RTS 


el valor primitive) de B 


Modulo Estab.-Punto-Ruptura 








Declaraciones de dates 


TABPR 


RMB 


32 


Tabia-Punlos-Ruptura 


TABVS 


RMB 


16 


Valores-Sustrtuidos 


NUMPR 


r := 


0 


Numero-Puntos-Ruptura 


NEXTPR 


-:= 


0 


Sguiente-Punto-Ruptura 


OPSWI 


FC8 


s:- 


Opcode- SWI 


MAXPR 


FCB 


16 


Num. max. de Puntos-Ruptura 
Proceso 2— Estab.-Punto-Ruptura 


PR02 


PSHS 
LSLA 


B,X 


Guarda regs. que se alteraran 
Multiplica por dos el desplaz. 




LEAX 


TABPR. PC R 


Direccion de base de la tabla 




LDX 


A,X 


Toma Dir. en Tabla-Puntos-Rup. (N) 




LDB 


,x 


Toma en esa dir. el Opcode 




LSRA 




Restaora valor primitivo A 




STB 


A,X 


Almacena Opcode en Valores- 
Sustituidos (N) 




LDB 


OPSWI, PCR 


Toma el Opcode SWI 




STB 


,x 


Lo almacena en la dir. 




PULS 


B.X.PC 


Restaurs y retorna 



Fin del proceso 2 
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Alerta roja 



« Fly erf ox » es un vertiginoso juego que permite al usuario 
parlicipar en combates aereos desde la cabina de un moderno 
avion de combate 



A pesar de que los juegos por ordenador han reco- 
rd do un largo camino desde los primeros dfas de 
los Space invaders (vease p. 1095), la mayor parte 
de sus innovaciones han estado relacionadas con el 
desarrollo de graficos. Los programadores se han 
preocupado fundamentalmente de hallar nuevas 
formas de comprimir los datos de un numero cada 
vez mayor de pantallas de graficos en una cantidad 
de RAM limitada. Mientras tanto, las excelentes 
capacidades de sonido de muchos ordenadores per- 
sonales han sido en gran parte dejadas de lado, 

Ahora la empresa norteamericana Tymac ha em- 
pezado a distribuir una serie de juegos que incorpo- 
ran sintesis de voz sin utilizar en realidad ninguna 
interface especial. El primero de estos programas 
que se ha comerrializado a nivel masivo es Flyer- 
fox, para el Commodore 64. Se trata de un progra- 
ma de simulacion de vuelo en el cuat el jugador 
"pilota" un avion de combate que debe cscoltar a 
un Jumbo, a bordo del cual viaja un alto funciona- 
rio del gobierno, a traves de un espacio acreo en 
litigio, Los cazas enemigos intentan derribar el 
avion comercial, y el objetivo del jugador es entrar 
en combate con estos y abatirlos. La sintesis de V02 
utilizada en el juego eons Est e en una serie de men- 
sajes que se le transmiten al jugador-piloto desde el 
Jumbo. 

El sintetizador de voz es una parte del software 
que ocupa alrededor de 11 K de mem or i a para al- 
macenar los datos que se utilizan para reproducer 
las frases requeridas, Flyer/ox emplea el metodo de 
codificaci6n de "prediction lineal". En este siste- 
ma, las palabras se convierten en senales digitales, 
que se almacenan luego en RAM. Cuando se nece- 
sita una palabra determinada, se accede a los datos 
digitales correspondientes y la palabra se reproduce 
a traves del chip SID del Commodore. 




Los graficos del juego son siempre en alta resolu- 
tion. La visualization en pantalla consiste en vistas 
frontales que muestran el cielo tal como se veria 
desde la ventana de la cabina, y el panel dc instru- 
mentos. El jugador cuenta con varios medios auxi- 
liares de navegaciom entre ellos una brujula y un 
panel de radar que muestra a los cazas MiG aproxi- 
maridose, al tiempo que se le concede tiempo para 
prepararse para el combate. Otra de las ayudas que 
se proporcionan son dos luces intermitentes, una a 
cada lado del horizonte, que le indican si los MiG 
se hallan sobre o bajo el nivel de la cabina. 

Las escenas de combate son rapidas y muy realis- 
tas. Cuando aparece un MiG en la pantalla, e! pro- 
grama produce un zumbido de aviso y el jugador 
debe entonces maniobrar el Flyerfox de modo tal 
que el atacante quede justo en el punto dc mira. 
Esto no es facil, ya que los aviones hacen regates y 
bajan en picado a gran velocidad. Una vez el obje- 
tivo esta fijado en la mira, el jugador puede dispa- 
rar los misiles rastreadores de calor; sin embargo, 
estos no son mfalibles y con frecuencia los cazas 
enemigos consiguen escapar* 

A pesar de que los graficos son de una gran cali- 
dadj no ofrecen excesiva varicdad. La ilusi6n de 
movimiento se consigue modificando los patrones 
de las nubes, y el suelo es simplemente una cuadri- 
cula rotatoria. Tambien hay que decir que el avion 
de linea aporta poco o nada al juego. Dejando de 
lado cl evidente paralelismo con el hecho real del 
Jumbo 007 surcoreano abatido por un avion soviet!- 
co hace un tiempo, que deja el juego abierto a tier- 
tas acusaciones de falta de buen gusto, resulta difi- 
cil comp render los motives de la inclusion del avion 
comercial . Solo se lo puede observar desde la cola, 
y el Flyerfox es incapaz de darle alcance cuando 
intenta entrar en combate con los cazas. Ademas, a 
diferencia de un avion verdadero, al ser atacado, el 
Jumbo ni siquicra intenta huir. 

Ciertamente. Flyerfox representa una nueva ten- 
dencia en materia de juegos por ordenador. La sin- 
tesis de voz dentro de un programa es un tenia que 
se ha estado considerando durante cierto tiempo, 
Ahora Tymac ha producido un juego que utiliza la 
voz, pero que no exige ninguna interface ni disposi- 
tive de hardware especial. En cste sentido, es pro- 
bable que llegue a ser considerado como un hito en 
el desarrollo de juegos por ordenador, 



Flyerfox: Para el Commodore 64 
Editado por: Tymac Corporation 
Autores: Gregory Carbonaro, Charles Te uteri 
Ronald Pintus, Arthur Asprornatis 
Palanca do mando: Necesaria 
Format©: Disco o cassette 
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Robotica/Aplicaciones 

Hablemos del habla 




Para entender la dif icultad de hacer habEar a un robot es necesario 
considerar algunas teorias acerca de la adquisicion del lenguaje 



El c studio del habla humana ha propiciado la exis- 
tencia de dos escuelas de pensamiento: la de quie- 
nes piensan que las aptitudes del lenguaje son inna- 
tas (algo con Id que ya hemes nacido) y la de quie- 
nes op in an que el lenguaje se adquiere o se apren- 
de. Los psicologos que sostienen que este es innato 
senalan que el hombre es la unica criatura que se 
comunica mediante el lenguaje. Quienes piensan 
que es adquirido aluden a experimentos realizados 
con animales a los cuales se les ha ensenado a co- 
municarse con los humanos a t raves de signos. 

Si las personas aprendieran a hablax simplemen- 
te por hallarse inmersas eo un mundo que se rela- 
ciona por medio del habia, eataoces sena logico 
buscar algun metodo paia craseguir que los robots 
hicieran lo mismo. Al im y al eabo. la \ida sera 
muchisimo mas sendlla ^ un robot podkra apren- 
der el lenguaje por el mero hecho ck escDchar 
como lo hablan quienes io rodean. 

Se han lie vado a cabo riertos intentos para lograr 
que un ordenador amptie sos cooociiiiieritos de gra- 
ma tica gracias a que se ie proporcionan ejemplos 
extras de estmexuras gramaricales de frases, mien- 
tras que con otros experimentos se ha intent ado 
conseguir que un roboi aprenda palabras y morfe- 
mas (elementos del lenguaje) nuevos en cualquier 
idioma simplemente mostrandoselos, Pero aun no 
se ha desarrollado ningun sistema que haya logrado 
ensenarle a un robot a aprender el habla. 

En consecuencia, en la practica, las aptitudes del 
robot para adquirir un lenguaje se basan en el su- 
puesto de que este es innato, que las aptitudes no 
se aprenden y que lo que debemos hacer es elabo- 
rar las reglas del lenguaje y fijarselas al robot per- 
manentemente como si el hubiera nacido con eUas. 



En general, esto const a de dos fases diferenciadas: 
el anal is is sintactico y el an&lisis semantico, 

El andllsis sintactico trata de la gramatica de lo 
que se esta diciendo y decodifica la estructura su- 
perficial del mensaje o codifica el mensaje en una 
forma gramatical correcta para que el robot la 
transmita, El me to do mas comun para realizar esto 
es mediante un drbol de andlisis (parsing tree), que 
gradualmente va descomponiendo, o construyen- 
do ? una oration a partir de las diver sas partes de la 
misma* Esta no es una tarea sencilla; no obstante, 
poco a poco se est& abordando con cierto exito. 

El andlisis semdndco es mucho mas complicado e 
implica elaborar el sentido del mensaje (cuando el 
robot esta escuchando hablar a alguien) o elaborar 
cual es el mensaje que se necesita comunicar ( aian- 
do el robot desea fahbHp a uno). El probiema del 
ti t. ler.r-^e r.: -.ZzztT- 
cfiente de su entomo: su agnificado depende del 
contexto en el que esta incluido (y esto no se aplica 
solo al entomo hablado, sino al contexto global del 
mensaje). Este contexto puede abarcar el conoci- 
miento del mundo circundante mientras uno esta 
hablando, asi como el conocimiento que eada una 
de las partes posee acerca de la otra. 

Este enfoque se ha adoptado en experimentos di- 
rigidos por el tientifico inform a tico Terry Wino- 
grad, quien escribio un programa que permiti6 que 
un robot entendiera lo que se le decia y actuara a 
tenor de las instrucciones. Sin embargo, Winograd 
utilizo una simulacidn por ordenador de un robot 
que solo era capaz de operar en un entomo def ini- 
do muy minuciosamente. En este caso, el mundo 
del robot consist ia en una cantidad de bloques de 
construcci6n que era capaz de manipular. El pro- 



Ver, comparer y hablar 

Cuando una persona ve un 
objeto —una manzana, por 
ejemplo — y le da un nombre 1 
existe una comprensi6n del 
significado de "manzana" . El 
robot puede reccnocer 
visualmente el objeto mediante 
la comparacion de lo que ve con 
una i mag en interna, y puede 
repetir el patrtin de sonido que 
tiene afmacenado para 
acorn panar a 'manzana 1 '* Pero 
no comprende en absoJuto que 
el objeto es una fruta comestible 
ni, y quizd sea mis importante, 
que la manzana en realidad le 
"pertenece" a la persona. Esto, 
por supuesto, es algo que el 
humano entiende perfectamente 
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grama de Winograd, conocido como SHRDLU, 
rue capaz de efecluar un buen analisis semantico, 
pero el entorno que era capaz de disccmir era ex- 
tremadamente simple. Un robot que hubiera esta- 
do operando en el caos que es el mundo real hubie- 
se tenido muchfsimas mas dificultades para entcn- 
der lo que se le estaba diciendo. 

Con el objeto de que los robots empleen prove- 
cbosamente el lenguaje, ha de baber un mensaje 
que se transmita de la persona al robot, y vice versa. 
Para los autdmatas ciberneticos, hablar es relativa- 
mente facil, porque, dado que sus conocimientos 
son tan restringidos, es probable que io que deseen 
expresar sea muy limitado. Para ellos es mucho 
mas dificil entender lo que una persona pueda de- 
cides, porque todo lo que se desee comunicarles 
sera mucho mas dificil de analizar. 

En una epoca se penso que la entrada en forma 
de voz a los robots se analizaria llevando a cabo un 



lugar, analizaremos las limitaciones de este metodo 
y luego veremos como superarlas. 

La limitacion mas evidente es que un magnetofo- 
no es mecanico, caro, voluminoso y susceptible de 
romperse. De mode que el siguiente paso consiste 
en tomar el mismo mensaje y convertirlo a una 
forma digital, de modo que pueda ser almacenado 
en un chip de la memoria del robot, Ello se realiza 
mediante un convertidor de analogico a digital, en 
el cual se utilizan numeros para representar la 
forma de on da de ia voz, que van a de mane r a cons- 
tants Este es el mismo procedimiento que se aplica 
para la grabacion digital de musica en, por ejem- 
plo, los sistemas de disco compacto, 

Este metodo tiene, asimismo, sus inconvenien- 
tes. Uno de los problemas fundamen tales es que 
una serial digitalizada ocupa muchisimo lugar en la 



SPEECH RECOGNITION 

systsm interface 

STUART SVSTSMS 




Oiry hablar 

Crear habla por ordenador y 
rtabta para robots es bastante 
facil. Existen a la venta 
d spositivos para smtesis de 
voz P como el Currah, incluso 
para Jos ordenadores person ales 
mas pequefios. Pero el 
leconocimiento es mas d if foil 
deoido a las variaciones de la 
: :-Tiaen que los humanos 
pnxioncian los son id os 
iflcaJicos y a causa de la 
santidacf de memoria y de 
:o:anc?a deprocesoque 
tc j eren para manejarun 
wcaoulario de mas de unas 
Docas palabras. Sistemas como 
a Bag Ears (literalmente 

z'zrtzs orejas") yel Apricot 
Fl Sevan incorporada una 
peqttna gama de instrucciones 
^coDocbies, pero demasiado 
pocss como para cub-fir mas de 
scacartidad minima da 



analisis sintactico de la entrada y que este revelarfa 
el signifieado del mensaje. Pero trabajos recientes 
han puesto de relieve la import ancia del conori- 
miento acerca del mundo circundante y del contex- 
to en el cual se expresa el mensaje. Esto ha llevado 
a experimentos en los cuales se realiza un analisis 
sintactico tentativo de la serial del habla para for- 
muiar una primera conjetura sobre el signifieado. 
Luego, a la luz de lo que el robot sabe acerca del 
mundo y de las cosas que es probable que se digan 
en so entorno, el robot revisa su analisis sintactico 
original con la fin alidad de ir acercandose gradual- 
mente a un analisis correct o de lo que se esta di- 
ciendo. No obstante, esto dista mucho de lo que 
hoy puede hacer cualquier robot, Ahora vamos a 
estudiar como hablan y como entienden la voz los 
sistemas actuates de robots. 



Smtesis de voz 



El metodo mas simple de smtesis de voz emplea un 
magnet of ono en el cual hay un mensaje pronuncia- 
do por un ser humano que esta grabado en cinta y 
que el robot reproduce en un momento adecuado". 
Puede que esto no se parezca mucho a la idea que 
se formo usted cuando pens6 por primer a vez en el 
habla del robot, pero es el punto de partida de 
todos los sistemas de sintesis de voz. En primer 



memoria. La grabacion en disco compacto mues- 
trea la serial acustica alrededor de 44 000 veces por 
segundo con una resolucion de aproximadamente 
1 6 bits (es decir , la amplitud de la forma de onda en 
cualquier momento se almacena como un numero 
de 16 bits, que permite discernir 2 16 niveles, donde 
2 16 = 65 536) . Utilizando este sistema, cada segun- 
do de la grabacion ocupana 88 000 bytes, Evidente- 
mente, un mensaje hablado supera la capacidad de 
almacenamiento de cualquier microordenador. Sin 
embargo, esta velocidad de muestreo solo es aplica- 
ble a la reproduction de son! do de alta fide I i dad; se 
podria construir un sistema de habla sencillo con 
una resolution de ocho bits y una velocidad de 
muestreo de 3 000 muestras por segundo, jlo que 
solo ocuparia tres Kbytes! 

Sin embargo, con el fin de dejar libre la maxima 
cantidad de espacio de memoria, es necesario reali- 
zar mas economias. Los linguistas han descubierto 
que el lenguaje hablado se puede descomponer 
convenientemente en unidades que se denominan 
fonemas. En conjunto, la opini6n general coincide 
en el hecho de que existen alrededor de 40 fonemas 
diferentes para la mayoria de los lenguajes habla- 
dos, de modo que es posible almacenar la ex act a 
information acustica necesaria para describir cada 
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■B(k estos 40 fonemas v luego utilizar estos como 
h tee del habla del robot, f q 
woo relariva a los fonemas 
ckqp smserizadoF de voz qoe sc fabric* cora e rrial- 
s ¥ fiodo k> qac d iota* k& de hacer es encade- 

requeri- 
oomo una 
:z rrcenador. 
de voz que exis- 
esCTibiendo el 
k* de expresar en una version 
F :■: . - ruirnie. eJ mensaje 
Puece? venir aqui?) se es- 
lia wwfcaai heah~\ y esto seria suficiente 
[K el dap smtetizador produjera la serie co- 
de sondes. Esta notacion no es exactamente 
2-z utilizan los lingiiistas para describir 
(ellos poseen su propio alfabeto espe- 
> pero es suficiente para los robots. 
L_ ±rii i e^:e punto. observara que el robot ya 
en^kando un mensaje pregrabado: esta 
fleaerando mensajes propios. Por esta 
r . ..r i-: robot diga to que de- 
■eoeadad de tener el mensaje entero 






Few Id issed. s asi dos lo propusieramos, podria- 
' programax algunas de las reglas de la 
i en un intento de bacer que el robot dije- 
► originales. Pero, como ya hemos mencio- 
- "* -~t:: Je cosas dife re ntes que podria ex- 
" mas bien limitado, de mane r a 

ninguna necesidad de una compleji- 
, a menos que nos dejemos llevar por 
- _ _ 2. venture ro o por la euriosidad de ver 
ae es lo que se puede hacer. 

: :i f-:u:"r,aao ;:]gjna vez un sintetizador de 
Ketv robot, sabra que la c alidad de la voz, si 
: " £:-neral comprensible, de ningun 
perfeeta. Ello se debe a dos factores. El 
es que la forma que toma un fonema cuan- 
> to Btfea un humano \ aria considerablemente 
de los fonemas que lo pre ce den y le si- 
El seguodo factor es que el sonido de la voz 
el significado que deseemos 
y "-Quieres sen- 
>esamas de nanera kJenri- 
: Sidpf io to dice 





Reconocimiento de voz 

El probiema inevitable a resolver cuando se desa- 
iroia un sistema de reconocimiento de voz es que 
hs cosas que deseariamos decirle a un robot, y las 
fefmas de expresarlas, son muchas y muy diversas* 
Un enfoque posible a este problema seria utilizar 
. i:i?aci6n en cinta de lodo lo que quisieramos 

.... : - : comprendiera. Cuando hablaramos, el 
pnAsa entonces explorar todas sus grabaciones en 
can j buscar la que mas se pareciera al mensaje 
ajK acabara de escuchar; y asi es ? en principio, 

. _ reconocen la voz muchos robots. Almacenan 
"zx>delos"' internos de mensajes hablados y, cuan- 
do se les habla, simplemente buscan el modelo que 
otr^ce la mayor similitud. Estos mode los general- 



ment e se obtienen entrenando al robot (re pit! en do 
varias veces una palabra o frase) hast a que adquie- 
ra un modelo 4£ promedio" de lo que hemos dicho. 
Este metodo funciona bien si solo se tiene una pe- 
quefia cantidad de cosas que decirle al robot y si 
vamos a decirselas siempre mas o menos de la 
misma forma. Se utiliza para aquellos robots que 
responden a instrucciones sencillas, tales como 
"adelante", "gira a la izquierda", etc. 

Sin embargo, este es un problema comparativa- 
mente simple que sc conoce como reconocimiento 
de voz discreta, porque cada item hablado es "dis- 
ereto", es decir, esta separado de otros mensajes 
median te una breve pausa durante la cual no se 
dice nada. 

El verdadero problema surge cuando deseamos 
hablarle al robot empleando voz continua, que es la 
que utilizamos norrnalmente, Pruebe decir ''Es un 
hermoso dfa de vcrano", y escuche atentamente lo 
que ha pron unci ado. Dcscubrira que se oye algo asi 
como "Esunher mosodia deverano", con las pala- 
bras y los sonidos chocando unos contra otros. 

La forma en la cual una persona aborda este pro- 
blema cuando esta escuchando hablar a otra consis- 
te en adivinar que es lo que el interlocutor intenta 
decir (lo que no suele ser dificil) y utilizar esta 
conjetura para decodificar el mensaje. Pero para 
que un robot hiciera eso, habria que saber muchisi- 
mo acerca de que es probable que se diga y quiera 
decirse con ello: una tarea muy complicada. 

En general, el empleo de la sintesis de voz en 
robots se esta convirtiendo en algo comun, si bien 
aun quedan cosas por hacer en cuanto a elevar la 
calidad de su habla, El reconocimiento de voz es 
una tarea mucho mas dificil y, en la actualidad, lo 
mas que se puede lograr con cierta facilidad es 
dotar al robot de una comprension del habla equi- 
valente a la de un perro entrenado que responda a 
las instrucciones habla das, siempre y cuando estas 
no sean muy numerosas. No obstante, existe un ex- 
tra ord in ario in teres por resolver to dos los proble- 
mas que entrana el habla del robot. 



tiyeme, sr^nteme 

EJ Voicemate es un brazo- robot 
contra lad o por voz que 
desarrolld el departamento de 
i ng enter fa del Politecnico de 
Newcastle (Gran Bretana) para 
uso industrial y de laboratorio 




Cortesia de Newcastfe Polytechnfc 
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Campo de f utbol 

En esta ocasion examinaremos el paquete "Mult I plan", una 
completa hoja de trabajo electronica para el Commodore 64 



En Multiplan, primer programa de hoja electronica 
producido por Microsoft, se han mcorporado mu- 
chas ideas avanzadas, desarrolladas a partir de pa- 
quetes de hoja electronica anted ores. Estas in- 
cluyen la capacidad de actuar sobre grupos de cel- 
das que se describen por nombre; clasificar un 
grupo de entradas de acuerdo a un criterio esperifi- 
cado; dividir pantallas, permitiendo visualizar si- 
multaneamente zonas diferentes de la hoja electro- 
nica; buscar rapidamente en la informari6n reteni- 
da en forma de tabla y luego producir un valor re- 
querido, y llevar a cabo construcciones condiciona- 
das IF,. THEN, entre otras. Disponible origin alme ri- 
te s61o para or den adores de alto nivel tales como el 
IBM PC y el Apple II, recientemente ha salido al 
mercado el Multiplan para el Commodore 64, 

El modelo que construiremos con este programa 
simplifica la tarea de mantener al dia las estadisti- 
cas. Los datos que utilizamos se refieren al futbol 
americano, pero la estructura se puede adaptar 
para otros dcportes. 

Despues de cargar el Multiplan, se visualiza una 
hoja de trabajo de formato estandar de 63 colum- 
nas y 255 filas. Tanto las filas como las columnar 
estan numeradas, de mo do que la celda base, en la 
esquina superior izquierda, es la celda R1C1 (por 
Fila (Row) 1 Columna 1). En la parte inferior de la 
pantalla aparece un menu de instrucciones, con un 
cursor que destaca la prim era option, Alpha. Las 
instrucciones del menu de Multiplan se pueden se- 
leccionar puis an do la barra espatiadora para des- 
plazar el cursor hasta la instruction deseada y pul- 
sando Return, o tecleando la primera lefra de esta. 

Con frecuencia, la selection de una instruccion 
hace que se visual ice un submenu que ofrece una 
amplia varied ad de opciones para fonnateo de 
datos, administration de memoria, etc. Pulsando 
una tecla de letra se accede a una instruccion, de 
modo que uno debe digitar A de Alpha antes de en- 
trar texto, Los numeros se pueden entrar directa- 
mcnte, pero las formulas deben ir precedidas por 
un signo mas (+} o igual (=}. 

Las dos primeras filas de la hoja de trabajo retie- 
nen titulos* Por eonveniencia, nemos formateado 
las celdas desde R1C1 hasta R2C5 para texto conti- 
nue), lo que permite extender el texto mas alia de 
los limites de la celda. Ello se consigue digitando: 

F(formato) C(eldas) R1C1:R2C5 
colocando luego el cursor encima de la palabra Cont 
y pulsando Return. Los dos puntos se utilizan para 
indicar una serie de celdas. Algunas columnas han 
variado su ancho para dar cabida a sus entradas. 

La hoja de trabajo tiene dos poreiones principa- 
les: una retiene information para un cquipo espeti- 
fico durante un periodo de nueve semanas, y la otra 
es una tabla de los result ados gana/pierde para 
to do s los e quip os de la misma "conferencia" (vease 



texto sobre futbol americano en el margen de la 
pagina contigua). Una vez construido el esqueleto 
del modelo, gran parte de los datos semanales ha- 
bran de entrarse a mano, con unas pocas formulas 
para mantener actualizados los totales a medida 
que avanza la temporada. 
Results dos de la Liga 




SCtifcEO ALLOWED 



Infoime del rendimlento por equipos 




La primera portion de la hoja de trabajo es una 
tabla. Los totales de esta se deben actualizar cad a 
semana, despues de que hayan jugado los equipos, 
Mediante el almacenamiento de la information en 
una tabla po demos sacar partido de una dc las ca- 
racteristicas de Multiplan: la facilidad SORT (clasifi- 
car). Hcmos entrado los nombres, categorias y 
datos de los equipos. El orden initial de estos esta 
basado en las posiciones que ocupan en la liga. Sin 
embargo, la tabla se puede clasificar por cualquiera 
de las categorias almacenadas. Multiplan ciasificara 
una serie especificada de filas de una columna por 
orden numerieo ascendente o descendente. EI 
texto se clasifica alfabeticamente. 

Como ejemplo de funcion SORT, vamos a reaco- 
modar los datos reflejados por los nombres de los 
equipos en orden alfabetico. Despues de digitar S, 
de SORT, Multiplan visualiza lo siguiente; 

SORT by column:_iietween mws:_and:_ 
order: >< (CLASIFICAR la columna_entre 
las filas y por orden ><) 
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medLanie ta cornpararion de los puntos totales de 
: : rias: Points Scored ('juntos ganadDs" por 
Heestro equipo) y Points Allowed ( 'puntos cedidos": 
el marcador del rival). Necesitamos una sentencia 
como esta: ft Puntos Ganados > Puntos Cedidos, print 
WIN (ganado), else print LOSS (perdrdo). 

Nuevamente, queremos referencias relativas y, 
por lo tanto, utilizamos movimientos del cursor 
para indicar las posiciones de los dos valores. Colo- 
que el cursor en R34C3, etiquetada WIN/LOSS^ y 
entre la f6rmula: 

IF(R[-6]C>R[-2]C J Jt WIN"/'LOSS ,, ] 
Observe que el texto que se utiliza dentro de las 
formulas debe ir encerrado entre dobles comillas y 
que se necesitao parentesis para encerrar las condi- 
ciones. Ahora copie la formula a lo largo de la fila> 

Construction conditional (IF... THE H) & 



- : ra desplazamos los datos de la pantalla pul~ 
sattky k ftecha del cursor que serial a hacia aba jo y 
tafaaos la segunda portion de la hoja de trabajo: 
: rr:— t eel rendimiento individual por equipos. 
- . _ = ^TLizaran dos formulas. La primera es una 
— -. ::mula SUM (suma), para llevar un total 
"i:: de los valores semanales. Localice la 
" i^"::,-eiada "TOTALS (totales) dc la section 
#as (R24C12), Desearemos que Multiplan sume los 
. -ia columna semanal. Dado que que- 
rr^-#:* coptax la formula de modo que se hallen los 
MEdcspexa todas nuestras eategorfas (cubriendo la 
aoB£ desde R25C1 2 hasta R32C1 2) ; necesitamos in- 
rzr -Tj- referenda a una celda relativa. En 
IWafwft« esto se realiza senalando las celdas acti- 
os ote d cursor. La formula se entra digitando: 
pofcando hiego la tecla de Ia flecha 
d enrsor quede situado 
cJ caiacter dos puo- 




como antes. EI modelo que hemos creado contiene 
datos para nueve semanas* Debido a las dimensio- 
nes de la pantalla, no podemos ver ni las etiquetas 
del margen izquierdo de nuestro informe por equi- 
pos, ni los totales de la derecha. Pero podemos di- 
vidir la pantalla en dos ventanas, que se puedan 
desplazar juntas o por separado, 

Ahora desearemos divtdir la pantalla vertical - 
mente en la columna 3, de modo que pulse W(in- 
dow) (ventana) y S(plit) (dividir), seguidas de V(ertl- 
cal). Entonces el program a visual izara: 

WINDOW SPLIT VERTICAL at column:_linked 
VESNO. (Division vertical de ventana por la 




i ii/ n mi fas Botaks para los valores reteis- 

3cs eihom descrita. Ahora copk la formula en 
s scsie de eddas desde R25C1 2 hasia R32C12 man- 
HKodo el cursor en la formula y empleando la 
Esmjcrion COPY: C(opiar) d(own) (abajo) 7 fiias. Uti- 
le? d mismo proceso para hallar los totales para 

: : - _S- e YDS PASS. La formula SUM se coloca 
ia ^dda R27C3* para las yardas ganadas en ata- 
aae. y en R31C3, para las yardas cedidas al equipo 
" - -- ::rrnufa sc copia on las ocho columnas de 
r-ara cubrir cl penodo completo de 
z-= z -err anas. 

Lasegtiuda formula, empleando la sentencia IF, 
: z : mas complicada pero sumamentc litil. 
E- ' -t-::o modelo dejaremos que Multiplan deter- 
se a un partido se ha ganado o se ha perdido 



ill 



4 tJIH^LOSS^ 




Us ted tendra que entrar la column a 3, desplazar el 
Cursor hast a NO y pulsar Return. Si las ventanas no 
estan unidas se les puede desplazar por separado. 
Ahora las etiquetas se pueden ver independiente- 
mente de que porcion de la hoja de trabajo se este 
visualizando. Para cerrar la ventana digite W(indOW) 
(ventana) C(lose) (cerrar), seguidas de su numero* 



Fiithol amerlcano 

Paraqu[enesnoesten 
familiarizados cone! futbol 
americano , he aq u ( una breve 
explication de los terminos que 
se utllizan en^L Dos equipos 
compuestos por 1 1 jug ado res se 
tuman para tratar de desplazar 
un bal6n ovoide a t raves de una 
Imea de goL Las metas opuestas 
est^n separadas por 100 yardas 
(91 m). El bal6n lo puede 
transportar un correccr, 
arrojandoJo hacia ad el ante como 
un pase P o pate£ndolo por entre 
los postes de la porter fa. Se 
consiguen tres puntos por un 
kick patada {llamado field goat 
tiro libre); se otorgan seis 
puntos por un carry 
(denomiiado touchdown: tan to 
marcado al tocar el suelo con el 
balon detras de la metadel 
adversarro), y uno por un kick 
despues de un touchdown (Jo 
que se conoce como un punto 
tras touchdown). 
Cada equipo dispone de cuatro 
intentos o downs para llevar el 
balon 1 0 yardas hacia la meta 
contraria. Sitiene exito, puede 
seguir hacia la meta con otros 
cuatro downs. Cuando un 
jugador I leva el balon, ello se 
denominaun rush (carrera), y el 
numero de yardas que recorra 
un equipo constitute un in dice 
decuan lejos se ha llevado el 
baldn durante el partido. El 
numero de yardas passing 
senala la distancia a la cual se ha 
fanzado eJ baldn. 
En la National Football League 
(Fa principal Jiga profesional de 
Estados Unidos) hay dos 
"conferencias sl : la American 
Conference y la National 
Conference. Los equipos juegan 
una temporadade16 
encuentros que comienza en 
septiembre y termina en enero 
con la Super Bowf (Supertazom 
por la forma del tipico estadio 
de futbol). En esta participa el 
mejor equipo de cada 
conferencia 
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Programacion Juego de aventuras 



Aventura y emocion 

Iniciamos un gran proyecto en que guiaremos al lector a traves de 
las etapas de creacion de un juego de aventuras 



Los juegos de aventuras se hiricron populares a 
principios de los anos setenta, cuando se ideo el 
juego Calabozos y dragones (Dungeons and dra- 
gons). En este juego los p art icipa rites asumen el 
papel de varios personajes de un mundo imaginario 
disenado por el "amo de la mazmorra v (dungeon 
master). Este mundo imaginado se suele componer 
de un intrincado laberinto de salas que contiencn 
objetos y peligros que han de ser superados por los 
jugadores. Generalmente, el objetivo del juego no 
es otro que escapar del laberinto, en la mayoria de 
los casos rescatando por el camino a alguien o algo. 
Los programadores de ordenadores centrales fue- 
ron los primeros que aplicaron el juego a estos, 
construyendo complejos laberintos para que deam- 
bularan por ellos otros usuarios de ordenadores 
centrales. La ventaja del Calabozos y dragones ba- 
sado en ordenador era que el amo de la mazmorra 
y los jugadores no tenian necesariamente que estar 



presentes al mismo tiempo, permitiendo que las 
person as jugaran en eualquier momento que lo de- 
sear an, Desde entonces, el juego del tipo Calabo- 
zos y dragones ha ensanchado considerablemente 
tanto su horizonte como su atractivo: el MUD 
(Multi-User Dungeon: mazmorra multiusuario; 
vease p. 864) es un buen ejemplo del grado de refi- 
namiento que han alcanzado algunos de ellos. 

Algunos juegos de aventuras estan basados ex- 
clusivamente en texto, mientras que otros se valen 
del color y los graficos para proporcionar imagenes 
en pantalla. Sin embargo, algunos criticos sostienen 
que la adicion de graficos supone la ocupacion de 
un valioso espacio de memoria que, de lo contrario, 
se podria utilizar para agregar mas enredos a la es- 
tructura del juego. Asimismo, senalan que la ima- 
gen grafica por ordenador de una escena o de un 
lugar no tiene comparacion posible con la propia 
imagination de uno al evocar una imagen basada 
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Juego de aventuras/Proijramacion 



* description textual No 
rdcpopdandaride 




analizare- 
la programa- 
A lo largo del 
s^ctiones de un 
afeanzras llamado Digi- 
on programa comple- 
. rame asume el papel de 
^dktiiixtko" al que se le encarga la tarea 
al interior de un microordenador para 
r j rescatax al misterioso Digitaya de las ga- 
la maquma. A lo largo del camino se pre- 
nuchas dificultades y acechan muchos peli- 
*] jugador habra de valerse de todos sus co- 
digs sobre los orden adores para escapar 
I programa, en la medida de lo posible, esta 
: — 'e standard ofreciendose los com- 
m en bs casos necesarios. For lo tanto, 
:_ana: se disponga de suficiente capaci- 
Bemofia, el programa funcionara en su or- 
Paesto que vamos a estudiar con todo de- 
dhersas tecnicas de programacion, seria di- 
. ..r muchos de los secretes del juego, y 
en deirimento, en cicrta medida, del placer 
roon el cuando estuviera acabado. For con- 
e. construiremos, juntamente con Digitaya, 
p paxalelo, mas breve, llamado El bosque 
&?. con el que demostraremos las tecnicas y 
Kitmos utilizados para construir el juego 

mto de parti da para el diseno de nuestro 
c avenruras es el trazado de un mapa del 
PMastico que estamos imaginando. En este 
anos de mar car los diverse s escenarios del 
k position de todos los objetos que se pue- 
er 5 dar importancia aque- 

=osDOs que se consideren "espetiales". La 
l £e te * >Mf ^ M ™ g del mapa simplemente 
-_r z-± 1 -p::: s^aza ie ellcs y 




especial que hemos tenido en cuenta al elegir el nu- 
mero de escenarios es que todos los especiales se 
ban numerado primero. El orden por el cual se nu- 
roeren los otros carece de importancia, pero una 
vez que se han seleccionado los numeros es impor- 
tant e no modificarlos con posteriori dad, 

Programacion de los datos 

La primera tarea de programacion es convertir la 
information del mapa en datos para cl programa. 
Existen muchas formas de hacer esto, pero lo que 
haremos aqui es utilizar dos matrices unidimensio- 
nales para retener los datos. La primera matriz, 
ES$() ? retiene descriptions de cada escenario. Por 
cjemplo, para el escenario 7, ESS(7) eontendra "en 
un sendero", Cuando posteriormente los datos se 
utilicen en el programa para describir un escenario 
iran precedidos por las palabras "Ud. se halla". 

La segunda matriz, SLSQ, retiene datos relatives 
a los posibles movimientos que se puedan efectuar 
desde un escenario (sa/idas). Nuestros dos juegos 
se limitan a cuatro direcciones: Norte, Este, Sur y 
Oeste. SL${) proporciona informacion acerca del 
numero de escenario al cual uno se traslada para 
cada una de las cuatro direcciones, Los datos estan 
almacenados como una serie compuesta por ocho 
digitos. El numero de escenario para cada direction 
se entra por el orden NESO, utilizando un numero 
de dos digitos para cada direcci6n. 

Por ejemplo, el escenario 7 tiene salidas al 
Norte, ai Sur y al Oeste, pero ninguna hacia el 
Este- Los dos primeros digitos de SL$(7) son 08 (no 
8) , que indica que hacia el Norte esta el escenario 
8. El segundo par de digitos, 00, indica que en esta 
direccion no hay ninguna sal i da (Este). Los pares 
de digitos 03 y 06 representan los escenarios que se 
encuentran hacia el Sur y hacia el Oeste del empla- 
zamiento 7. Utilizando este sistema se podrian es- 
pecificar hasta 39 escenarios; si se necesitaran mas 
de 39, entonces los datos para SL$() se habrian de 
entrar como grupos de tres digitos. 

Los tres objetos de El bosque encantado se leen 
en otra matriz, IV$(,). Esta matriz bidimensional 
lleva el registro de la posicion de cada objeto mien- 
tvas el mismo se va trasladando a traves del bosque. 
.in rrjetc posec ima description y su emplaza- 
_~ er t. -*.izi Por ejemplo. IVS(C.1) es 
m uriiiiTm ai comienzo del juego 
fV&C 2> A raedida que. en el trans- 
dd joego. ios objetos se vayan trasladando de 
1 z ero, fas cicmenios de posicion de la ma- 



ik5 x 3 (cottiD icscjd la BustraciOG), Haeo- 
zz Dizttz pose^ zLndcdcT it r*[ escenarios 
aseoo en una cuadiicula de 10 x 10. 
oiadrados de la cuadricula inicialmente no 
numeros y el disenador comienza por relle- 
niapa con escenarios, En el mapa de El bos- 
:ado h ay un sen d ero , dos tuneles. un pan- 
nn claro y un pueblo. Tambien estan marca- 
n parte inferior de los cuadrados en los que 
\:ados, las posicion es de varios objetos. 
Qos escenarios serial ados con un asterisco (*) 
rfpeciales" y se los tratara de forma distinta 
[ resto de los mismos, 

1 \ ez terminado el trazado podemos numeral 
ino de los escenarios. La unica consideraci6n 



Al de ios datos del mapa, en nuestros dos 
f:aa:- ~-\j,>. Sl- :ra:a dc ana "sum a de 

control^ y se proporciona para asegurar que los 
datos de direction se hayan digitado correctamen- 
te. Ello se realiza calculando un total actualizado 
de los valores de los datos, que se cote j an con la 
suma de control. Si estos no coinciden, entonces se 
ha producido un error y la ejecucion del programa 
se interrumpira. Usted observara que en Digitaya 
se utilizan dos sumas de control. Ello se debe a que 
la suma total de los datos de direccion es demasiado 
grande como para retener la facilmente en una sola 
suma de control , de modo que se calcula por sepa- 
rado un total para los cuatro digitos izquierdos y los 
cuatro derechos. En el pr6ximo capftuio del 
proyecto disenaremos rutinas para manipular y vi- 
sualizar los datos de este mapa. 




Programacion/Juego de aventuras 



Digitaya 



=QI SR LEER DATOS MATRIZ 
-l ■■ _EE=. I NVENTARIO ** 

: 111 :s.4) 
HP C= 1 TD8 

•i-: : j .ivs(C2) 



em rai leer datos escenarios & salidas 

7 i = : 55),SLSf55) 

: :■=: :;=0: rep/ imici.aliza^ sln-'as decontrol 

: =1= >1T054 

ess(C},sls[C) 

StO C1=C1+VAL(LEFT$(C),4)) 
522D C2=C2*VAL(RIGHTS(SL$(C),4)) 
fiv \EX" C 

=2^" READ CA:IFCAoC1 THEM PRINT ''ERROR SUMA DE CONTROL": 

STOP 

52=0 3EAD CA:IFC6<>C2 THEN PRINT" 1 ERROR SUMA DE CONTROL": 

STOP 
5260 RETURN 

6270 REM * * ' v DATOS DE 1NVENTARI0 
5280 DATA NUMERO DE DIRECCION,45,LLAVE,34,ESCUDO 
LASER 25 

6290 DATA B I L LET E AL TR I E ST AD 0 , 2 6 T A R J ETA DE CREDITO DE 
DATOS, 26 

6300 DATA .DIGITAYA, 30, LIBRO DE CODIGOS, 1 9, DISPOSITIVO 

ACTIVADOR DEL BUFFER, 13 
6310 : 

6330 REM DATOS ESCENARIOS & SALIDAS 
6330 DATA EN LA TQMA DEL TELEVISOR ,00000000 
6340 DATA EN LA PUERTA PARA EL US UAR 1 0,00090 100 
6350 DATA EN LA PUERTA PARA CASSETTE,001 10000 
=6360 DATA EN LA PUERTA PARA PALANCA DE MANDOS, 
00130000 

6370 DATA EN UN DISPOSITIVQ TRIESTADO,0O1 70000 
6380 DATA EN LA UNIDAD ARITMETICA Y LO GIGA, 0031 00 16 
6390 DATA EN EL ACCESO A LA MEM ORI A, 00490000 
6400 DATA EN LA VIA DE E/S,090GQOG1 
6410 DATA EN IA VIA DE E/S,10000B02 
6420 DATA EN LA VIA DE E/S,1 1000900 
6430 DATA EN LA VIA DE E/S, 12001 003 
6440 DATA EN LA VIA DE E/S, 13531 100 
6450 DATA EN LA VIA DE E/S, 14001 204 
&*60 DATA EN LA VIA OE E/S, 15001 300 
6470 DATA EN LA VIA DE E/S UNA SENAL DICE "S OUT H" , 
00001400 

DATA EN EL REGISTRO DE DATOS, 0006 1700 
5490 DATA EN UNA VIA DE 8 PlSTAS J 6001 805 
6500 DATA EN UNA VIA DE S PISTAS.1 7001 900 
6510 DATA EN UNA VIA DE 3 PISTAS.1 8002000 
6520 DATA EN UNA VIA DE 8 PlSTAS ,10292100 
6530 DATA EN UNA VIA DE 8 PlSTAS, 20282200 
6540 DATA EN UNA VIA DE 8 PlSTAS, 21 272300 
6550 DATA EN UNA VIA DE 8 PlSTAS, 22262400 
6560 DATA EN UNA VIA DE 8 PlSTAS, 23250000 
657D DATA EN LA MATRIZ DE CAR ACT E RES, 26360024 
5580 DATA EN LO ALTO DE LA MEM0RIA.27352523 
W90 DATA EN LA MITAD DE LA ME MORI A, 28342622 
5600 DATA EN LA MITAD DE [A MEM0RIA K 29332721 

- ■ ' j ATA ABAJO EN LA MEMORIA.C0542820 
6620 DATA EN U GUARIDA DEL ACUM U LAD OR , 0000060 0 
6830 DATA EN UN LARGO CO RR EDO R, 00420006 
€640 DATA EN UN REGISTRO INDICE ,31000000 
5650 DATA ABAJO EN LA ME MORI A, 54403428 
6660 DATA EN LA MITAD DE LA MEMORIA.33393527 
6670 DATA MUY EN LO ALTO DE LA MEMORIA.34383626 
5680 DATA EN LA MATRIZ DE CAR ACTE RES, 35370025 
6690 DATA EN UNA TABLA VECTORIAL ALEATORIA,00000C00 
6700 DATA EN LO ALTO DE LA MEMORIA CON VISTA A UNA VIA.39003735 
6710 DATA EN LA MITAD DE LA MEMORIA, 40003834 

EN LA MEMORIA — HACIA El ESTE HAY UN ACCESO, 
3933 

i ABAJO EN LA MEMORIA.00004054 
EN UN CORREDOR P 0O430031 
E*. Ji C03REDGR.00440042 
m UN CORREDOR,00004543 
EN EL REGISTRO DE OIRECC1ONES.OOC046OO 
BJ UNA VIA DE 16 PlSTAS, 45004700 
JA Bt UNA VIA DE 16 PlSTAS, 46004BO0 
lTA EN UNA VIA DE 16 PlSTAS ,47004900 

lift EN UHA VIA DE 16 PlSTAS SE VISLUMBRA HACIA EL OESTE UN ENORME 

MBt UNA VIA DE 16 PISTAS.49005100 
mat UNA VIA DE 16 PISTAS.50005200 
JA B* UNA VIA DE 16 PlSTAS, 51000000 
JA Bi \M VECTOR A LA MEMORIA.00290012 
1\ _A. MEMORIA,00413329 

=r: " :-~:s sjwb de control 

6880 MTA 100169,103973 
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El bosque encantado 

6000 REM LEER DATOS OBJETOS Y MAPA " T * 

6010 DIM IVS(3 t 2),ESS(10),SLS(10) f O(2) 

6020 FOR C=1 TO 3 

6030 READ IVS(C,1),IV$(C,2) 

6040 NEXT C 

6050 : 

6060 FOR C=1 TO 10 
6065 READ ES$(C),SL$(C) 

6070 CC=CC+VAL(SL$(C)):REM TOTAL SUMA CONTROL 
6080 NEXT C 
6090 : 

6100 READ CD IFCDoCC THENPRINTTRROR EN SUMA DE CONTROL' :STOP 
6110 : 

6120 REM*' DATOS OBJETOS " 

6130 DATA ESCQPETA,10 1 FARQL I 9 1 LLAVE 1 5 

6140 : 

6150 REM " DATOS MAPA " 

6160 DATA JUNTO A LA ENTRADA DE UN TUNEL,0OO009O0 
6170 DATA EN UN PANTAN 0.00000000 
6180 DATA EN UN PUEBLO r 07000000 
6190 DATA JUNTO A LA ENTRADA DE UN TUN EL, 05060000 
6200 DATA EN UN SE NO ERO, 00020400 
6210 DATA EN UN SEND ERO, 02070004 
6220 DATA EN UN SEND ERO, 08000306 
6230 DATA EN UN SEN DERO, 09000702 
6240 DATA EN UN SENDERO,01 100300 
6250 DATA EN UN CLARO, 00000009 
6260 REM " DATOS SUMA DE CONTROL "* 
6270 DATA 32253121 
6280 RETURN 




Complementos al basic 

Nuestros listados se escribieron para el 
Commodore 64, Para el Spectrum y el BBC Micro 
es necesario introducir estas modificaciones: 

Spectrum: 

Para ei tistado de Digitaya, real ice estos cam bios: 

6110 DfMV$(8,2 t 24):DIMI$(4,24) 

6170 DIM L$(55 ? 52):DIM E$(55,8) 

6200 READ L$(C) t E$(C) 

6210 LETC1 = C1+VAL(E$(C)(T0 4)) 

6220 LET C2=C2 + VAL(E$(C) (LEIN (E£(C) ) - 3 TO)) 

Ademas, todos los valores DATA se detoen encerrar 
entre co.mil.las, con la exception de la suma de 
control de la Ifnea 6880. En el fistado de El bosque 
encantado introduzca estas modificaciones: 

6010 D I FVl VS(3 , 2 , 5) : D I Ml 1.3(10,22) 

6015 DIM ES(10 P 8):DIM l$(2 s 5) 

6030 READV$(C,1)V$(C,2) 

6065 READ L$(C),E$(C) 

6067 LETCC=0 

6070 LETCC=CC+VAL(E$(C)) 

Encrerre entre comillas Jos valores DATA, a 
exception de la suma de control de la Ifnea 6270. 

BBC Micro: 

En el listado de El bosque,,. agregue esta Ifnea: 

6067 CC=0 
En ei de Digitaya no se precisan modificaciones. 
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Slalom 




ejercen gran atraccion en la mayoria de los 
un «juego de invierno» en una version para 
Dragon 



appctjor los deportes de invierno sin 
3W€l osseo de romperse una pierna! Lancese 
fesde k> also de la pista e intente pasar por el mayor 
■iii ■' I n posible de puenas sin chocar can los palos* 
tea cambiar de direction pulse caalquier tecla, 





i: 



FOR 1=1 TO 32 

\=>r 

RBI ESQUIAOOR HACIA LA IZGUIERDA 

SS(0}=CHR$(201) 

=£M ESQUIAOOR HACIA LA DERECHA 

3&-i=CHRS(19B) 

-I =:-ND0 BLANCO 

I-S: 

=SV DIRECCJON INICIAL: 

: = JZQUIERDA 

B=-1 

=3SICI0N INICIAL 
-z\\ DEL ESQUIAOOR 
J=16 

REM DISENO DE LAS PUERTAS 



f : : :: :::-zz\-z^ 

i :e_ee:_ -z: 

ISO Y=HT(iG2)-2 

160 X=tl-1G-Y)"2 

155 REM ESQUIAOOR A LA ALTURADE 

166 REM UNA PUERTA? 

1 70 IF K> = 1 6 AND (K-5)/1 0 = J NT((K-5)/1 0) THEM 
GOSUB 330 

1 79 REM FIJACION DE UNA PUERTA? 

180 IF K<284 AND K/10=INT{K/10) THEM GOSUB 
350 

189 REM M0VIMJEMT0 DEL ESQUIAOOR 

190 IFINKEY$<>" 1 ' THEN D=-D 
200' J=J+D 

210 IFJ<2THENJ=2 
220 IFJ>29THENJ-29 
230 PRINT@511.ES; 
240 PRINT @J 1 SJB(D/2+0.5); 
250 NEXT K 
254 REM 



255 REM FIN DEL REC0RRID0 

Hi = :'' 

lil 22 \~ "54rPUEftTA(S) SALTADA(S) :";T; 

Z7D PRINT <£ 229rOTRA BAJADA ?"; 

280 DS-IMKEYS 

290 IFDS= " THEN 280 

300 IF D$o £ 'N" THEN RUN 

310 CLS 

320 END 

324 REM 

325 REM PUERTA SALTADA? 

326 REM 

330 IF POINT (X-2,Y)<>0 OR POINT (X+4,Y)<>3 
THEN IF POINT (X-4,Y)<>0 OR POINT 
(X+2,Y)<>3 THEN T=T+ 1 :SOUND 1 p 1 

340 R'ETUHN 

344 REM 

345 REM FIJACION DE UNA PUERTA 

346 REM 

350 P1=RND(3)-2 

360 P=P-6*P1 

370 IF P<482 THEN P=488 

380 IFP>506THENP=500 S 

390 PRJNT@P,P$; & 

400 RETURN © 
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I ware/El Beasty 



Un robot 
en casa 



Poco a poco estan empezando 
a aparecer en el mercado robots 
de precio economico: el Beasty 
ha sido uno de los primeros 



EI Beasty se suministra en forma de kit, y el usuario 
lo puede ensamblar con la ayuda de un par de des- 
toniilladores, Con el equipo tambien se suministra 
cl software basado en cassette que contiene el sis te- 
nia operativo Robol que se utiliza para control ar el 
brazo-robot. 

Se proporcionan dos manuales. El folleto de 
construccidn comienza coo una larga introduccidn 
que versa sobre la historia de la robotica, para 
pasar lucgo a los detalles relativos a la construc- 
tion. Al usuario novato tal vez la gran cantidad de 
componentes y las un tanto complejas instrucciones 
le resulten algo intimidantes; se ofrecen ilustracio- 
nes, que pueden ser de mayor utilidad. No obstan- 
te, incluso el principiante sera capaz de montar el 
brazo correctamente, si bien conseguirlo le 1 levari 
un poco de tiempo. De momento, el Beasty no se 
puede adquirir ya montado, si bien el fabricante, 
Commotion, a firm a que lo puede ofrecer arm ado si 
asi se le solirita. 

Una vez montado, el Beasty se compone de una 
base que soporta una juntura que posibilita el mo- 
vimiento lateral. Esta juntura lleva concctada una 
corta varilla de aluminio, que esta unida a la parte 
superior del brazo mediante una segunda juntura. 
Una tercera juntura conecta el ante brazo. Estas 
junturas estan alimcntadas por servomotores, cada 
uno de los cuales controla dos cortas varillas rigidas 
que estan conectadas al "esqueleto" del brazo. 
Cuando un servomotor gira, tira hacia el de una de 
las varillas y cmpuja a la otra en la direction contra- 
ria, haciendo girar, por consiguiente, la juntura y 
movie ndo el brazo. Un servomotor opera tradu- 
ciendo imp u Is os digit ales en movimiento. El motor 
recibe una serie de impulses a una determinada fre- 
cuencia y el procesador interpreta estos impulsos 
como un angulo de movimiento- Mientras la fre- 
cuencia permanezca const ante , el motor manten- 
dra el brazo en su position actual; un eambio en la 
frecuencia de los impulsos le indie a al procesador 
que se requiere un nuevo angulo y entonces el 
brazo se mo vera. 

Los servos EP128 utilizados en el Beasty pueden 
generar 3,5 kg/cm de empuje. Esto sign if ic a que, 
en 1 cm a lo largo de un eje, el servo puede levantar 
3,5 k, mientras que lo largo de 10 cm puede levan- 
tar 350 g. Este es un punto importante a tener en 
cuenta cuando se levantan pesos; obviamente, el 
servo del "hombro", al estar mas ale j ado del peso a 
levantar, sera el que sopor tara la mayor tension, 

El servoprocesador esta alojado en una pequena 
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caja negra que no se halla unida al brazo pro pi a - 
mente dicho- Esta caja posee cone c tores para co- 
nectar hasta cuatro servo motores (la cuarta cone- 
xion es para un motor opcional que se puede utili- 
zar para operar un "garfio" o cualquier dispositivo 
de agarre similar en el extremo del ante brazo). 
Tambien hay un conector de entrada que se conec- 
ta en interface con la puerta para el usuario del 
BBC, un cable de potencia que se enchufa en el 
conector de potencia auxiliar del ordenador. 

Una vez cargado el software desde cassette, la 
pantalla visualiza una indicaci6n que le recuerda al 
usuario que el sistema esta en modalidad Edit. En 
Robol, una Mnea de programa se compone de un 
numero de line a, una construction y una serie de 
numeros, cada uno de los cuales corresponde a una 
de las cuatro opciones de servomotores. Si la Ifnea 
contiene la instrucci6n MOVE (mover), los numeros 
corresponden a la frecuencia de impulsos que man- 




r Bsssty estandar viene equipado con tres servomotores 
eaaecfcadcs a una caja interface. Los servomotores son mote res 
Ltiiizados en robtitica debido a la forma en que proporcionan 
.*= *-srza constante o "momenta rfe torsion" correspondiente a 
s^uencia de Ja serial digital suministrada 



tienen a los servos en sus positioned en curso* El 
usuario puedc altcrar cstos numeros y mientras el 
sistema este en modalidad Edit el servomotor que 
se este regulando se movera a medlda que se efeo 
tuen las modifkaciones, lo que permite positional 
el brazo tal como lo desee el usuario. Cuando el 
operador se stenta satisfecho respecto a las posicio- 
nes de cada uno de los motores, se debe pulsar Re- 
turn, despues de lo cual se visualiza una nueva linea 
en Robol y se puede programar la siguiente serie de 
movimientos. 

Si se pulsa la tecla de funcion FO se puede haeer 
que el brazo lleve a cabo una seeuencia completa 
de movimientos, El programa se puede comenzar a 
ejecutar a partir de cualquier Imea pulsando prime- 
ro Fl y despues FO (esta produce la ejecucion desde 
el principio del programa), o bien carnbiando el nu- 
mero de Imea en curso mediante el empleo de las 
t eel as para el cursor. A I final del programa la se- 
euencia de aeeiones se repctira de forma a u to mat i- 
ca. Si el usuario deseara detener el programa, de- 
bera cambiar una instruction MOVE por STOP, 

Demoras cronometradas 

Durante la ejecucion de una serie de instrucciones 
MOVE se puede haeer que el brazo haga una pausa 
mediante la incorporation de una instruction WAIT 
(esperar), seguida de un numero. Esta trabaja ac- 
cediendo a la patilla TIMER 1 de la puerta para el 
usuario, generando una interruption. Dado que el 
reloj trabaja en unidades de 1/100 (centesimas) de 
segundo, WAIT 100 producira una demora de 1 s 
antes de que se lleve a cabo la siguiente instruction. 

La action del brazo se puede acelerar enorme- 
mente carnbiando la instruction MOVE por JUMP 
(saltar). Tambien se incluyen dos sentencias de cro- 
nometraje: JDELAY y M DELAY. El Beasty posee una 
demora incorporada que se produce antes de la eje- 
cucion de cada linea. Esta posee un valor por defec- 
to de 20 (es decir, 1/5 s), pero este valor se puede 
alterar utilizando JDELAY para sentencias JUMP y 
MDELAY para instrucciones MOVE, 

El sistema operativo Robol es fact] de utilizar, y 
programar el brazo para que realice movimientos 
_ complejos es una tare a sencilla que ocupa solo mi- 
1 ados El manual de operaeiones es breve pero per- 
adecuado. aunque los programadores 
□tren que la information 
ta programaada mas com- 
EL Beasty se puede controlar 
el programa Driver, este ac- 
para el usuario del BBC Micro de 
a los ejeniplos que hemos ofreci- 
do en nuestro apart ado de Bricolaje. 

Commotion ha incluido, asimismo, un corto pro- 
grama que permite efeetuar cop i as del software 
Robol. La men ta ble m en te , la mayoria de las unida- 
des de disco BBC emplean el conector de potencia 
auxiliar del BBC Micro, por lo cual no se pueden 
co nectar al mismo tiempo el Beasty y una unidad 
de disco. 

No obstante, a pesar de estos nimios data lies el 
Beasty es, ciertamente, una valiosa introduction al 
campo de la robotica. Se podria decir que este es 
un dispositivo en espera de una aplicaci6n, dado 
que en realidad no se puede afimiar que el brazo- 
robot sea autenticamente util y es bastante proba- 
ble que solo lo adquieran los aficionados mas entu- 
siastas. 




EL BEASTY 



SOFTWARE 



Robol y ruiinas activadoras 
en cassette. 



D0CUEWENTACI0N 



El Beasty viene con un 
manual de montaje y una 
guia de prog Tarnation. 



VENTAJAS 



Constituye una introduccidn 
a la robotica facil de utilizar 
y de precio economico, 



DESVENTAJAS 



La guia de montaje adolece 
de falta de claridad y existe 
una carencia de 
aplicaciortes obvias para el 
brazo, aunque Commotion 
ha prometido algunas 
mejoras que ampliaran sus 
usos. 
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Doniuccibn m doble sentido 

Este programa para resolver un 
laberinto interpreta a £ste de dos 
maneras. Dado que el laberinto 
se lee a parti r de sentencias de 
dates, esta almacenado en una 
matriz bidimensional, 
retertiGndose asimismo 
inicialmente los puntos de 
partiday de llegada como 
coordenadas, Con el fin de 
resoJver ef laberinto, el 
programa debe tratar cada uno 
de los cuadrados del laberinto 
comoe! "nudo" de un arbol. En 
vez de utilizar el sistemade 
coordenadas initial, cada 
cuadrado se numera, por 
consiguiente, por orden r 
empezando en el rincdn superior 
izquierdo del laberinto 
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Por el 
laberinto 



Ahora desarrollaremos un 
programa «inteligente» que 
conducira a traves de un 
laberinto el vehiculo que hemos 
creado 



La primera etapa en la construction de un laberinto 
es decidir d6nde lo realizaremos. Podria ser en ia 
superficie de una mesa o sobre el suekx El area 
designada se dividira entonces en cierto numero de 
cuadrados, dependiendo el tamano de cada uno de 
estos de las dimensioncs del vehiculo que se utiliza- 
ra para cruzar el laberinto. Cada cuadrado debe ser 
lo suficientemente grande como para permitir que 
el vehiculo pivote 360° en el interior de un unieo 
cuadrado, Entonces se puede marcar la superficie a 
modo de cuadricula. Para conformar el laberinto se 
puede n colocar sobre la superficie objetos tales 
como libros, tazas o pequenos trozos de madera. 

El programa exige que se espetifiquen las dimen- 
siones del laberinto y las posiciones de los cuadra- 
dos que est en ocupadas y aquellas que esten libres. 
El metodo mas sencillo de hacer esto consiste en 
utilizar un codigo binario: 1 para indicar que un 
cuadrado esta parcial o totalmente ocupado por un 
objeto, 0 para sen alar que est& vaclo. Para que no 
sea necesario entrar los datos relativos al laberinto 
cada vez que se ejecute el programa, esta informa- 
tion se debe escribir como una serie de sentencias 
DATA, Los cuatro datos finales son las coordenadas 
del punto de partida y del punto de llegada, Pode- 
mos imaginar que el origen de coordenadas esta en 
la esquina superior izquierda, siendo la fila superior 
la fila 0, y siendo la columna situada mas a la iz- 
quierda la columna 0, Este laberinto es el corres- 
pondiente a las siguientes sentencias DATA: 

I DATA 4,4:REM DIMENSIONS DEL LABERINTO 
DATA 1,0,0,0,0,0,1,0 
DATA 0,0,1,0,0,0,0,0 
DATA 1,1:REM COORDS DE PARTIDA 
DATA 2,3:REM COORDS DE LLEGADA 

" Encontrar una ruta a traves del laberinto no pre- 
senta excesivas difieultades, Podemos disenar un 

' programa que trace un c ami no desde el punto de 
partida , retrocediendo en los callejones sin salida y 
volviendo hacia atras los pasos necesarios hasta lie- 
gar finalmente al punto de llegada. La ruta hallada 
(sin los rodeos de los callejones sin salida) puede o 
no ser la ruta mas corta posible. Si desearamos ha- 
llar la mejor ruta entre los puntos de partida y de 
llegada, entonces debeiiamos adopt ar un procedi* 
miento que pruebe todos los posibles caminos entre 
los dos puntos. Vale la pena senalar que nuestro 
programa interpreta que la "mejor ruta" es la que 
utiliza la me nor cantidad de cuadrados. 
Podemos simplificar la tarea de probar cada una 
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Estructura de drbol 

Para encontrar la mejor ruta a 
traves del laberinto sedebe 
construir un "a>boP que 
represente las relaciones entre 
los cuadrados. Cada nudo se 
considers de uno en uno, 
creando niveles de nudos 



inferiores. Los nudos del nive! 1 
estan a un cuadrado de distancia 
de la partida; los nudos del nivel 
2 estan ados cuadrados de 
distancia, etc. Es bastante 
directo dibujar el arbof, pero 
implementar esta estructura en 
basic es m£s dificil 



de las rutas creando una estructura en los datos del 
laberinto que represente las relaciones existentes 
entre los cuadrados. La estructura de datos que 
mejor se presta para esta aplicacidn es un arbol je- 
rarquico* Empezando con el punto de partida como 
la "raiz" del arbol, podemos construir una segunda 
generaeidn de cuadrados (o "nudos") que estan a 
una distancia de un cuadrado de la raiz. A partir de 
esta segunda generation de nudos se puede cons- 
truir una tercera generaeidn, y asi sucesivamente. 
Podemos dibujar un arbol para cualquier laberinto 
numerando cada cuadrado y siguiendo la regia de 
que los descendientes de cualquier nudo se dibujan 
de izquierda a derecha por el orden Norte, Este, 
Sur y Oeste del nudo principal del laberinto. 

Este sencillo laberinto se puede resolver de cinco 
formas, sin desandar los pasos dados. En la ilustra- 
cidn superior se muestran tres posibles soluciones, 
como rutas a traves del arbol y como rutas verdade- 
ras por el laberinto, Para nosotros es evidente que 
la ruta 2 es la mas corta, pero ello se debe a que 
podemos evaluar el arbol lateralmente, es decir, 
podemos consider arlo como un todo. El orden ador 
debe resolver el arbol de forma lineal, tomando sis- 
tematicamente cada uno de los caminos posibles 
hasta hallar el nudo final o llegar a un callejon sin 
salida, En el primer caso se debe Uevar un regis tro 
de la ruta de exito; en e! segundo, antes de volver a 
empezar desde el nudo raiz se debe senalar el cami- 
no tornado como un callejon sin salida. El progra- 
ma continuara recorriendo el arbol hasta haber 
probado todas las ram as que parte n del nudo raiz. 

El basic no se presta facilmente para tratar algo- 
ritmos de este tipo y con frecuencia la programa- 
ci6n puede result ar torpe y dificil de mane jar. Len- 
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s co mo el logo y el algol estan mucho roejor 
para cumplir esta miaon. En basic tene- 
mos que llevar a cabo dos tareas fwlmn ttales: en 
praner lugar. debemos obteaer mmz flio arbol a par- 
mrdelos dates del Un \mmi td cmc ae le presen- 
F pr cafe csackado del laberinto 
que indiquen 
k de las cuatro direc- 
r asema de senalado- 
niatriz bidimensional, 
: % ^dmeiD del cuadrado y D es 
r :on$iguiente, en nuestro 
.TH(9 t 1) seria 5: el cuadrado que se 
ruadrado 9. Cuando el cuiidrado 
i z . n determinada no esta libre, o si hay 
«nera del laberinto, ello se puede marcar 
un valor especial, por ejemplo -1. 
A medida que se va recorriendo el arbol, la ruta 
iuaada se almacena en una seudopila, implemen- 
tada utilizando una matriz unidimensional y una va- 
liable. D. para indicar el siguiente espacio disponi- 
z'.t r_- ;a pila. El camino mas corto que se encuen- 
se tfflnbien se almacena en una matriz unidimen- 
, con el numero de pasos para la ruta almace- 
1 en el primer elemento de la matriz. 
Cuando el programa ha recorrido su camino a 
traces del arbol, se retendra un registro de la mejor 
en forma de una serie de numeros de cuadra- 
IlZ* 5-roniendo que originalmcnte el vehiculo es- 
orientado hacia el Norte en el cuadrado de 
5^ lo puede dirigir utilizando las relaciones 
; simples entre la direction a recorrer y 
: itrentia entre dos numeros de cuadrados con- 





/ / 





secutivos en la matriz de ruta. Por ejemplo, en 
nuestro sencillo laberinto, una diferencia de +4 in- 
dicaria norte, —4 indicana sur, y asi sucesivamente. 
Debemos entonces calcular el angulo a describir 
para cambiar la direccion, antes de seguir add ante 
hacia otro cuadrado. Dado que el vehiculo emplea 
motores elect ricos CD simples, los angulos de giro 
y las distancias recorridas se gobiernan mediante el 
perfodo de tiempo durante el cual esta encendida 
una determinada combination de motores. Para 
haccr un uso practico del programa cs nceesario 
realizar algunos experiments initiates para deter- 
minar los intervalos de ticmpo rcqucridos para des- 
cribir un angulo de 90° y avanzar un cuadrado. Esta 
information se debe entrar en las variables AF y FF, 
respectivamente, La versidn para el BBC exige uni- 
dades de una centesima dc scgundo, y la version 
para el Commodore 64 requicre unidades de un se- 
sentavo de segundo. 



ilucion al laberinto 



LABERINTO CBM 64 



: :e u-j/ada « 

r _ee= : -:s jbhmtg 
a> irr— r l lwehwtq 

^ ARBOL 



:__::v end 
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5700 FOR P=0 TO SX*SY-1:FORl=1T04;TR(P,l) 
6100 ; 

6110 REM ** CALCULAR PARTI DA Y LLEGADA **** 
6120 X-X£:Y=VS i . 30:S-N 
613* X=XF:V=YF:G0SUBS2CK}:F-N 

: 

6200 REM CONSTRUIR ** 

6300 LC=1:CC=0:REM INIC APUNTAOORES PJLA 

o400 LN(LC)=S:REM PUNTO PARTI DA 

645D CN=LN(LC):F!EM TOMAR DE LA PILA NUOQ EN CUflSO 

6500 DF-0 

6600 FOR D=1 TO 4 

6700 N=CN+DRfO):60SUB 9900 REM CDNVERTIR A X,Y 

6800 IF(X<0 OR X>SX-1 OR Y<0 OR Y>5Y-1)THEM 7300 

6900 IF "MZ(X,VJ=1 THEN 7300 

7000 JF (D-2 AND WSX=INT(N/$X))TH£N7300 

7100 IF $0=4 AND CN/SX=JNT(CN£X))THEN7300 

7200 IF TR[NJDfDH=CN THEN 7300 

7210 TR(CN.D)=rW)F=1 

7220 CC=CC+1:CN(CC)=N:REM PONER EN LA PILA 
7300 NEXT D 

7310 IFfDF=0 AND LC=1) THEN RETURN: REM NUDO TERMINAL 

2» LC=LC-1:R£M 0ECR8MENTAR ULTIMO APUNT PILA 
Sg * l£XJ TIOI StiKBFJl PROXIMO MJQO 



\])=-1:«EXHP &240 IF DF=DR(I) THEN D=l:l= 



~:.5: =.?• • 



• OOHM) PIA Bl OflSG EH ttJIM. PtA - 



8240 
&250 
8260 
: •,: 
8270 
8275 
8277 

S290 
S300 
8310 
8320 
8330 
8340 
835Q 

8370 
6300 
&3SC 
8400 
B410 
8420 
8430 
3800 

y.: 
zi : 




NEXT I 

DR=D-PD:PD=D 

H=INT[4-f- DR/4):R - (4+ DR) - A*h 



* - EFECTUA^ GIRO ••• 
FOR 1 = 1 TO R 

POKE REGDAT=t:REM GIRO £N SENTIOQ H0RARI0 
T=TI 

IF {TI-T)<AF THEN S310:REM ESPERAR 
POKE REGDAT=0:REM APAGAR 
MEXTI 

REM *** ADELAHTE **- 
POKE REG DAT- 5 
T=TI 

IF (Tl-TKFF mti 6330 
POkE REGDAT=0 
NEXT C 

RETURN 

R£M CONVERTIR N A X.Y **** 
Y=IKT(lt'SX)JC=N-SX*Y: RETURN 

REM **** CONVERTIR X.Y A N **** 
K=Y*SX^X:RETL)RN 



5SEM FACTORES OE T1EMP0 ANGULO Y ADELANTE 
25£DS+CHftS{17):NEXT 1 



■*«• iMPRIMIR LABERINTO **** 
CHRS[1471:REM LIMPIAR PANTALLA 
=0 TO ©<-1 
-0TOSY-1 

5 ^900:REM POSICIONAR CURSOR 
■^RS(32+MZ(X,Y)*134) 



=YS:GOSUB4903:PRINT'P" 
= YF:G DS J B49DD: PRFNT " LL" 



-« POSICIONAR CURSOR EN X,Y **** 
CHRS{1 9}; : PRINTTAB{X) L EFT${C DS,Y);:R ETURN 

CONSTRUIR ARBOL 

- IWCIALIZAR CON TERMINADORES 



f/90 

7790 
7800 
7810 

8000 
3010 
8020 
8030 
8042 
8050 
8100 
8110 
S120 
8130 
8140 
8200 
8205 
S2T0 
8220 
8222 
8225 



-~i QOa JB gWfeSOSUB8000:fF EF=0 THEN 7730 
R»D=1T04 

i™(CN.D)<>-1 THEN CN=TR(CM,D):DF=1:DR=0:0=4 

IF DF=0 THE.^J G OS L B S000 
IF EF=0 THEN 7730 
IF EF=1 THEN RETURW 

REM RECOMENZAR POR LA RASZ **** 

- CN : .1JAN0TR(CN,2)ANDTR(CN,3JAN0TRfC^.4)=-1 THEN EF=1 
RETURW 

REM **** GUARDAR MATRIZ **" 

IF C>SR{0) THEN RETLR,N:REM ES MAS CORTA LA RUTA NUEVA? 
SR(0) = C 

FOR 1=1 TO C:SR(IJ=RT(f):NEXT I: RETURN 

REM **** GUIAR VEHICULO — 

P0^ J:REM SUP0NE_R 0IRECCI0N INICIAL ES NORTE 

DF-SR{C^1J-SR[C) 

REM HALLAR DIRECCION REQUERIDA •* 
FOR 1=1 TO 4 



Para el BBC 

Efectuar las siguientes \ 
modificaciones: 

3130 RDD + &FE62:REG DAT=&FE60 
0290 ?REGDAT=9 
8300 TIME=0 

8310 REPEAT UNTIL TlME>=AF 
S320 ?=SL2LA- : 
8360 ?RE3CAT=5 
8370 TIME=0 

8380 REPEAT UNTIL TIME>=FF 
8390 ?REGDAT=0 
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El juego de la espada 



Vamos a crear un juego de 
aventuras basado en texto. Lo 
haremos mediante un enfoque 
general para que usted pueda 
construir su propio juego 



hn cstc capitulo nos limitaremos a analizar los as- 
pect os mas generates de la programacitin de un 
juego de aventuras, y en cl proximo considerare- 
mos los detalles especificos para un juego en parti- 
cular. 

En todos los juegos dc aventuras hay cinco acti- 
vidades basicas que el jugador debe ser capaz de 
llevar a cabo: se necesita recoger objetos o abando- 
narlos, lisfar las cosas que uno lleva consigo, obser- 
var los alrededores y desplazarse por el juego de un 
cuarto a otro (o de escenario en escenario). De 
modo que son 6stas las instrucciones basicas que 
vamos a programar antes que nada. Por razones de 
simpliridad, limit are mos la forma de las instruccio- 
nes a uno de dos tipos: o palabras individuals 
(como MIRAR) o bien pares compuestos por verbo y 
sustantivo (como ARROJAR ANILLO). El programa 
llevara dos listas: una denominada INVENTARIO, 
que incluir^ todo lo que el jugador lleve consigo en 
cada momenta, y la otra, llamada CONTENtDO, sera 
una relation de los objetos exist en tes en el cuarto 
actual. 

La primera instruction que vamos a definir es IN- 
VENTARIO: 

TO INV 
PRINT [UD. LLEVA:] 

IF EMPTY? : INVENTARIO THEN PRINT [NADA] 
ELSE PRINT :1NVENTARI0 
END 

Observe que este procedimiento utiliza la forma 
completa de la sentencia IF: IF <COndiciun> THEN <ac- 
cion 1 > ELSE <accidn 2> + La instruccion para coger un 
objeto sera COGER: 



TO COGER :ITEM 

IF MEMBER? :ITEM :C0NTENIDO 
THEN COGERLO : ITEM ELSE PRINT [NO 
PUEDO NO ESTA AQUI] 

END 



MEMBER? es una primitiva que verifica si un ele- 
mento pertenece a una lista. Para "coger" un ar- 
riculo necesitamos hacer dos cosas: anadirlo al in- 
ventario y eliminarlo de la lista de contenido. Estos 
son los procedimientos que realizan estas tareas: 

TO COGERLO :ITEM 

AGREGAR.EN.INV :ITEM 

SACAR. DEL. CUARTO :!TEM 
END 



TO AGREGAR.EN.INV :ITEM 
MAKE" INVENTARIO SENTENCE :!TEM 
; INVENTARIO 

END 

TO SACAR. DEL. CUARTO :ITEM 

MAKEXONTENIDO BORRAR :ITEM 

:C0NTENIDO 
END 

El ultimo de estos procedimientos implica borrar 
un elemento de una lista, tarea que fue uno de los 
ejercicios sugeridos en el capftulo anterior. 

TO BORRAR :ITEM 1ISTA 
IF:ITEM=FIRST 1ISTA THEN OUTPUT BUTFIRST 
rUSTA 

OUTPUT SENTENCE FIRST 1ISTA BORRAR :ITEM 
BUTFIRST 1ISTA 
END 

La instruccion para dejar un objeto se implementa 
de forma similar: 

TO DEJAR :ITEM 
IF MEMBER? :ITEM :INVENTARIO THEN 
DEJARLO :ITEM ELSE PRINT [NO PUEDES 
DEJARLO PORQUE NO LO TIENES!] 

END 

TO DEJARLO :ITEM 

SACAR. DEL. INV :ITEM 

AG REGAR.AL. CUARTO :ITEM 
END 

TO SACAR. DEL.INV :ITEM 

MAKE" INVENTARIO BORRAR :ITEM JNVENTARIO 
END 

TO AG R EGAR .AL. CUARTO :ITEM 

MAKE" CONTENtDO FPUT :ITEM :C0NTENID0 
END 

Habiendo entrado todos los procedimientos que 
hemos dado hasta ahora, es el mo memo de verifi- 
car su funcionamiento. En primer lugar, debemos 
definir las dos variables glob ales (INVENTARIO y 
CONTENIDO) y despues comprobarlas para las si- 
guientes instrucciones: 

MAKE"C0NTENID0 [ESPADA LANZA ANTORCHA] 
MAKE" INVENTARIO [FAROL] 
COGER "ESPADA 
DEJAR "FAROL 

Ahora examine CONTENIDO e INVENTARIO utilizan- 
do estas sentencias: 

PRINT :CONTENID0 
PRINT JNVENTARIO 

y compruebe que est&i correctas. 

Observe que hemos empleado comillas antes de 
los nombres de los objetos tanto en la instruction 
COGER como en DEJAR. El empleo de las comillas 
de esta forma ya es instintivo para el programador 
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zt logo, pero es probable que le require muy con- 
faso a un "aventurero" que no sepa oada aeerca del 
Jenguaje* Para posibilitar el enipleo ck la forma 
COGER ESPADA, que es mas namraL debemos defi- 




que hacer lo mismo con 
. _:. ice en nuestrc juego dc 
torn texto. 
MIRAR imprimira una description 
■ curso, una lista dc lo que contenga y 
rutas de salida del cuarto. Para haceT 
-erejitaremos otras dos listas; una primera de 
desoipckmes y una segunda de salidas. Con el 
e: ze poder incluirdescripcion.es extensas que 
ocupen mas de una linea de la paotalla, la lista de 
descripciones se define como una lista de listas. For 
ejemplo: 



IMKFDESCRIPCION [[UD ESTA PARADO JUNTO 
: :NTRADA][DE UNA CUEVA]] 
: _-_ . :■■ ar un registro de como se unen los cuartos 
cr.re sj\ cada cuarto tiene asignado un numero. La 
■:_ de saiidas es simplemente una lista de sublis- 
: ida una de ell as compiles: a por una direction 
| mm numero de cuarto. I 
Itor tanto: m^^^ 

E _ STA.SALIDAS ][N 4)[E 6]] = 

ya podemos deflnir MIRAR: 




70 MIRAR 

PRINTL :DESCR!PCiC 
PRINT " 
PRINT [UD VE:] 

IF EMPTY? :CONTENIDO THEN PRINT [NADA 
ESPECIAL]ELSE PRINT :CONTENID0 
PRINT * 

PBKT [PUEDE IR:] IMPRIMIR. SALIDAS 
USTA. SALIDAS PRINT " 

m 

sehaa empieado dos rutinas 
oe ja visualization 
>z r i zz *• _ Tin zr_- 



— — — rriir los numeros de los cuartos. 

TD IMPRIMIR.SALIDAS 1ISTA 

IF EMPTY? :LISTA THEN PRINT "STOP 
MAKE SALIDA FIRST 1ISTA 
: - NT1 FIRST : SALIDA 
— NT1 " 1 ' 
-I MIR. SALIDAS BUTFIRST 1ISTA 

: - describir todo cuanto se sepa a cere a de 

™ cuarto del juego poniendo juntas las tres sublis- 
35: la description, el contenido y las salidas. Por 

ejemplo: 

MAKE "CUARTO. 1 [[[UD ESTA PARADO JUNTO A LA 



ENTRADA] [A UNA CUEVA]] [ESPADA] [[N 4][E 6]]] 

Dado que CUARTO. 1 se define de esta forma, po- 
driamos dividirla en sus componentes individuates 
con el siguiente procedimiento: 

TO ASIGNAR.VARIABLES 
MAKE "CUARTO THING "CUARTO. 1 
MAKE "DESCRIPCION DESCRIPCION :CUARTO 
MAKE "CONTENIDO CONTENIDO :CUARTO 
MAKE "LISTA.SALIDIiilSTA,SALIDAS :CUARTO 



END 



JAS tlST/ 




THING "CUARTO. 1 es una alternativa de :CUARTOJ; 
significa "el contenido de la variable CUART0.1". 
Luego explicaremos el motivo de la utilizaeion de 
esta forma, Los subprocedtmientos se definen de 
esta manera: 

TO DESCRIPCION :CUARTO 
OUTPUT ITEM 1 :CUARTO 
END 

TO CONTENIDO :CUARTO 

OUTPUT ITEM 2 :CUARTO 
END 

TO LISTA.SAUDAS :CUARTO 
OUTPUT ITEM 3 :CUARTO 
END 

Tal como esta, este procedimiento sdlo funciona 
para CUARTO. 1. Necesitamos ampliarlo de modo 
que se lo pueda utilizar con un caracter mas general 
para cualquier cuarto, Esto lo hacemos empleando 
una variable global, AQUI, que contiene el numero 
del cuarto en curso* Supongamos que ahora este 
sea 2, La primitive WORD del logo produce una 
palabra compuesta por una combination de sus dos 
entradas (por tanto, WORD "CUARTOmAQUI produci- 
ria CUARTO^). Entonces le asignamos este nombre 
a la variable NOMBRE. CUARTO; en consecuencia, 
NOMBRE. CUARTO es CUARTO. 2. Ahora podemos 
asignar 
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CUARTO como THING ;N0MBRE.CUART0. 
TO ASIGNAR. VARIABLES 
MAKE "NOMBRE, CUARTO WORD "CUARTO.:AQUI 
MAKE "CUARTO THING :NOMBRE. CUARTO 
MAKE "DESCRIPCION DESCRJPCtON ;CUART0 
MAKE "CONTEN1DO CONTENIDO :CUARTO 
MAKE "LISTA.SALIDAS LISTA.SALIDAS :CUARTO 

END 



Ahora ya esta en conditioner de dibujar un mapa 
de los escenarios de su juego de aventuras y listar 
las descriptions de los mismos (con contenido y 
salidas). En el proximo capitulo acabaremos 
nuestro analisis general estudiando el movimiento 
entre escenarios y como se implementan los u peli- 
gros". Despues comenzaremos a consider ar un 
juego de aventuras complete como ejemplo de lo 
que se puede hacer. 



two lonea ics\^ ce ' 




Yin*- 



tHD 




1 



£N0 . , - 0 dp. cap ,w .. t n rte un< 






Codigo del 



/Lenguaje maquina 



Errores no, 
gracias 



con la 
iion del programa 
depuradoren lenguaje 
maquina iniciado en el 
capitulo anterior 




?ua el modulo de E/S hav que elaborar cuatro ruti- 
ns* mas: GETHX2, GETHX4, PUTHEX y PUTCR. Los 
dos primeros procesos sirven para tomar desde el 
teclado digitos hexadecimales: GETHX2 se encarga 
de los numeros hexa de dos digitos y GETHX4 de los 
de cuatro dfgitos. Para disenar estas rutinas, lo pri- 
mero que hay que hacer es saber si vamos a solici- 
tar la entrada siempre de dos o cuatro digitos (lo 
cual es facil de programar pero incomodo para el 
usuario) o bien aceptar uo numero de caracteres 
seguidos de un Return, El problema siguiente es 
decidir si se permitira el caracter de retroceso para 
borrar los caracteres ya introducidos, 

Vamos a adoptar el metodo mas sencillo para la 
rutin a GETHX4: solo se dara entrada a cuatro digitos 
y no se empleara el retroceso. El valor de 16 bits 
(que signifies una direction) puede retornarse en el 
registro D. 

GETHX2 plantea mas de un problema si conside- 
ramos las circunstancias en que sera usado. Debe- 
ran entrarse cantidades de 8 bits para inspeccionar 
y eambiar la memoria (or den M} 7 lo que significa 
- -~ - z'.rt El contenido de esta es 

a oontinuaci6n el usuario 
r a la position siguiente en 
hexadecimal de dos 
i position) o in- 
.p. ej.. para 

_ r "e yn*=~~ ? oeaa **iu los dos 
^zzr ±. fr - , 

ocfeo bits se puede retoraar em B j hmj i 
- r indica: er. >t 5 '.: z-z >t 

ha introducido es un oumero de dos digitos. A ten- 
dm valor 0; si se trata de Return . tendra valor 1 , y 
si es un punto, valor —1, Tales va lores no permiten 
romprobar el contenido de A sin compararlo con 
otro valor. 

Supongamos de momento que para este modulo 
se han hecho las siguientes declaraciones: 

HEXCHS FCC01 23456789ABCOEF 

DOT FCB7 (punto) 

RETURN FCB 13 (Return en codigo ASCII) 

Podemos pasar 16 como la longitud de la cadeoa 
para GETHX4, donde solo n ecesi tamos digitos hexa, 
y 18 para GETXH2, donde se necesi tan tambien los 
otros dos caracteres. 




Rutina GETHX2 




Data: 

Caracter-siguiente es el ASCII contenido en A 
Desplazamiento a la tabla de Car-Validos, esta en B 
Valor-hexa se construye en B y es un valor de 8 bits 
Flag esta en A y es 0,1 o bien -1 

Proceso: 
Tomar Caracter-Siguiente 
IF caracter es un punto (Desplazamiento = 16) 

entonces 

Poner Flag a -1 
ELSE si el caracter es un Return (Desplazamiento = 

17) entonces 

Poner Flag a 1 
ELSE 

Guardar Desplazamiento temporalmente 
Tomar Caracter-Siguiente (en este punto solo son 
validos digitos hexas) 
Construir Valor-Hexa 

ENDIF 

La forma final codificada de GETHX2 la encontrara 
el lector en la pagina 1259. For otro lado, la codifi- 
cation de la rutina GETHX4 se hace ahora mas facil 
con algunas piezas de la presente rutina. Haciendo 
HX4 un punto alternativo de entrada a la rutina 
GETHX2, cs posible 11a mar a esa rutina y asegurar- 
nos de que solo se aceptan digitos hexa validos, 
siempre que carguemos B con un 1 6 antes de la lla- 
ma da. De esta man era el proceso de torn a de cua- 
tro digitos hexa se simplifies considerable men te . 



Rutina GETHX4 



Data: 



Numero-hexa, es un valor de 16 bits que se retorna 
en D 

Byte - M as - S i g n if i cat i vo . y 

Byte-Menos-Significativo, son dos valores de 8 bits 
que serai retomados en B 




r Bi*M^Signfficativo temporalmente 
Tomar Byte^fenas-Significativo 
Construir Numero-Hexa 

Damos la codification final de esta rutina de spues 
de la de GETHX2. 

El disefio de las rutinas para la visualization de 
caracteres es mucho menos complicado. En J a ruti- 
na PUTHEX ? supondremos que el numero de 8 bits 
que necesitamos se encuentra en B. 



Rutina PUTHEX 



Data: 

Numero, es el valor de 8 bits que se encuentra en B 
Desplazamiento, es el desplazamiento de 4 bits 
colocado en HEXCHS 

Proceso: 

Extraer los 4 bits mas significativos tie Numero para 
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emplearlos como Desplazamiento 
Visualizar HEXCHS (Desplazamiento) 
Extraer los 4 bits menos significativos de Numero 
Visualizar HEXCHS (Desplazamiento) 

La rutina final necesaria para mane jar las entradas 
y salidas es la subrutina PUTCR, Esta es inmediata, 
y la codification final se explica por si misma. Una 
vez codificadas todas las rutinas que se necesitan, 
podemos ya disenar el modulo entero de E/S. 

Modules de Entrada Saiida 

Proceso: 

Tomar Orden devolvera Desplazamiento en B, el cual 
puede server de desplazamiento para una 
tabla de salto 

Tomar Direction deja la direction de retorno en D 

Tomar Valor deja el valor de retorno en B, flag en A 

Visualizar Valor, pasado en B 



Visualizar Direccion, pasado en D 

La codificacion final del modulo E/S se eneuentra 
en la pagina siguiente* Ahora ya podemos volver al 
modulo de Puntos de Ruptura que iniciamos en el 
capitulo anterior (vease p. 1238), Ya dimos la codi- 
ficaci6n del segundo proceso de este modulo, que 
establece los puntos de ruptura. Pospusimos el pro- 
blem a de la codificacion del primer proceso (inser- 
tar puntos de ruptura) porque presupoma la obtcn- 
cion de una direccion. Dado que esta tarea ya la 
hemos encarado en las rutin as que proporcionamos 
aquf, podemos seguir adelante ofreciendo la ver- 
sion codificada del proceso, que incorpora una bi- 
furcation a la subrutina GETADD. 

Observese que en el codigo, la instruction INC 
NUMBP, PGR sum a un i a Numero-Puntos-Ruptura, 
que es el desplazamiento correcto en la tabla de 
puntos de ruptura. Sin embargo, la direccion se re- 
torna en D, y esto destruira el valor contenido en A, 



La rutina GETHX2 



La rutina GETHX4 



GETHX2 


LDB 


#18 


Nimero-car-val 


HX4 


PSHS 


X 


Guarda el registro empleado 




LEAX 


HEXCHS, PCR 


TomaenXladir, de Car-Validos 




BSR * 


GETCH 


Toma Caracter-Siguiente 


1F00 


CMPB 


#16 


Si Desplazamiento = 16 




LDA 
BRA 


#$FF 
ENDFOO 


Ponerel flag a — 1 (en 
complement!) a dos) 




CMPB 


# 17 


Sf Desptazamiento = 17 




LDA 


# 1 


Poner a 1 el flag 




BRA 


ENDFOO 






LSLB 
LSLB 
LSLB 
LSLB 




Desplaza 6 cuatro lugares a la 
Equierda para formar el dfgito 
mis slgnificativo; B conserva el 
desplazamiento en HEXCHS y por 
ello el valor binario 




PSHS 


B 


Guarda B temporal merrte 




LDB 


# 16 


Solo son validos digitos hexa 




BSR 


GETCH 


Caracter-S i gu i e nte 




ADDB 
PULS 


1,S+ 
X,PC 


Construye un numero de 6 bits y 
pierde B temporalmente 


La rutina PUTCR 




PUTCR 


PSHS 


A 


Guarda A 




LDA 


# 13 


Return en eddigo ASCII 




BSR 


OUTCH 


Lo visual iza 




PULS 


A, PC 






GETHX 


LDB 


# 16 






BSR 


HX4 


Toma Byte- Mas-Sign if icativo 




PSHS 
LDB 


B 

# 16 


Guarda Byte- MSs-Signif icativo 
temporalmente 




BSR 


HX4 


Toma Byte- Men os-Sfg n if icativo 
enB 




PULS 


A 


TomaByte-MSs-Sign, para 
devolverlo a A 




RTS 




El valor requerido esta en D 


Rutina Visualizar-Puntos-de- 


Ruptura 






BPLABS 


FCC 


'1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16' 


SPACE 


FCB 


32 


Espacio en eddigo ASCII 


DISPBP 


PSHS 


A,B,X,Y 






LEAX 


BPTAB,PCR 


Dir. de Tabla-Puntos-Ruptura 




LEAY 


BPLABS, PCR 


Dir. de etiquetas 




CLRB 




Pone en despl. 0 a Num.-Punto- 
Rupt. 


WH1L01 


CMBP 
BGT 


MUM BP, PCR 
ENDW01 


While Numero-Punto-Ruptura < 
= Numero- Puntos- Ruptura 




LDA 


,Y+ 


Visuaiiza etiqueta 




BSR 


OUTCH 






LDA 


,Y+ 






BSR 


OUTCH 






LDA 


SPACE, PCR 


Visualiza un Espacio 




BSR 


OUTCH 






PSHS 


B 


Guarda temporalmente B 




LDD 


,X+ + 


Guarda Direccidn 




BSR 


DSPADD 






PULS 


B 


Restaura B 




BRA 


WH1L01 




ENDW01 


PULS 


A,B,X,Y 


Restaurayretorna 



1258 



puesto que el registro D comprende los legistros A y 
BL Esta es la razon por la que empieamos Y para 
conservar la direccion actuaL 

Habiendo codifkado d pa— a proceso del mo- 
dolo de Puntos de Raffin. tprrha am ties proce- 
- r - : - .." I - :: :< .-lies invierten 
las das puua o s la» abora bemos codificado: 

_ de la tablo un 
_f Desactivar-Punto- 
idOpank S\VI y devuelve el valor 
[ E*a*muo capftulo estudiaremos estas 
. La *erara. que visualiza todos los pun- 
ttOti^CHz. es la ultima que codiftcaicmos. 

Visualizar-Puntos-De-Ruptura 

■■nero-Punto-Ruptura es un contactor de 8 bits 
para recorrer la tabla de Puntos de Ruptura; 
se encuentra en B 



Punto-Rujrtura-Actual, es la direction a visual izar 
Etiquetas-de-Puntas-Ruptura son numeros 
(decimales) de dos dfgitos para etiquetar las 
direccrones conforrne son visualizadas 
Espacio, es el caracter espacio que separa una 
etiqueta de una direccidn 

Proceso 3: Visuafizar-Puntos-de-Ruptura 
Poner Numero-Punto-Ruptura a 1 (un 

desplazamiento actual de cero) 
While Numero-Punto-Ruptura < = Nurnero- 
Puntos-Ruptura 
Visualizar Etiquetas-de-Puntos-Ruptura 

(Numero-Punto-Ruptura) 
Visualizar Tabla-Puntos-Ruptura (Numero- 
Punto-Ruptura) 
Incrementar Numero-Punto-Ruptura 
Endwhile 

Fin de Proceso 3 



La rutina PUTHEX 

HJTHEX PSHS A.B.X 



EI modulo Entrada/Salida 



PSHS 
LEAX 
LSRB 
LSRB 
LSRB 
LSRB 
LDA 

BSR 

PULS 

ANDB 

LDA 



fSm 

LUX 

LDA 

CMPA 

BGE 

INC 

LSLA 
LEAY 
BSR 
STD 



B 

HEXCHS.PCR 



B,X 

DUTCH 
B 

#%00001111 
B.X 

OUTCH 
A.BXPC 



BPTA8 

NUMBP.PCR 

MaXBP,PCR 

ENDF01 

NUMBP.PCR 

A,X 

GETADD 
,Y 



Guarda regs. empleados 

Guarda Btemporalmentd 

Dir. de HEXCHSen X 

Desplazamiento de custro lugares 
para los bits mas significativos 



Toma el caracter adecuado y lo 
coiocaenA 

Lo visualize 

Toma de nuevo B 

En mascara tos cuatro bits mas 
significativos 



Segundo caracter 



y retorna 



■Ruptura 



BBRJ1 PULS A,B,X,Y 



Si Numero-Puntos-Ruptura < 
Max 

Sumar 1 a Numero-Oe-Puntos 
Ruptura 

Muitiplica por dos el 
Desplazamiento para la tabla de 
16 bits 

Toma la direccidn 

Almacena la direccidn en Tabla- 
Purrtos-Ruptura 

Restauray retorna 



HEXCHS FCC 
DOT FCB 
RETURN FCB 
COMNDS FCC 
GETCOM PSHS 
LEAX 

LDB 
BSR 
PULS 
GETADD BSR 
BSR 
RTS 

GETVAL BSR 
BSR 
RTS 

DSPVAL BSR 
BSR 
RTS 

DSPADD PSHS 
TFR 
BSR 
PULS 
BSR 
PULS 
BSR 
BSR 
RTS 



'0 123456789ABCDEF' 



1 3 

'BUDSGRM.Q' 
A.X 

COMNDS, PGR 

#8 

GETCH 

A,X,PC 

GETHX4 

PUTCR 

GETHX2 
PUTCR 

PUTHEX 
PUTCR 

B 

A.B 

PUTHEX 
B 

PUTHEX 

B 

PUTHEX 
PUTCR 



Return en cddigo ASCII 



Guarda los contenidos de Ay X 

Coloca la direccidn de los 
caracteres de la ordenen X 

Numero-Car-V4l 

Toma Caracter 

Return 



Guarda B tempo raiments 
Byte-Mas-Significativo en 8 

Recupera B 



Fuera de la ley 



En este juego el usuario 
personifica a Mugsy, jefe 
de una banda de gangsters 
en la Norteamerica de losf 
anos treinta 




El papcl de Mugsy constste en tomar diversas deci- 
siones sobre el numero de "clientes* de la banda en 
ios que se puede confiar, cyan to dinero se puede 
gastar en municiones para la banda, y las sumas 
que se le dcben abonar a la policia en concepto de 
soborno. Si no se gasta el dinero suficiente en 
annas, la banda sera desarticulada, Ademas, si la 
policfa no reeibe suficiente dinero, aflanara la caja 
de caudales de los gangsters y la incautara. 

El principal personaje que aparece en la pantalla 
es Louey, el hombre que es ta mano derecha de 
Mugsy, Al principjo del juego Louey enuncia suctn- 
tamente las reglas. E[ jugador toma sus decisiones 
estrategicas en respuesra a las solicitudes de Louey 
y luego espera los result ados, lapse en el que se 
visualiza una de las dos pan tall as an i mad as del 
juego. La prim era pan ta I la muestra una taberna 




I if hampa 

Ess set dos de las escenas de 
.11 _i : "era muestra 
:e : - if := preguntas y 
M^Mg^Artri jimgn en la cual 
--i - z-i :±sandoa Mugsy 
. " • : ~f de la 
: ■ ir i :e os 
*thasss' _= secynda escena 
;r^-K£ = ma de las 

e =- -^adas. Observe 
^~ca afrededcr del 
B i esealera. Es un 
b — ascararniento 
at as eel das de 



dandestina en la que un gangster le dispara a un 
rival. En la segunda se ve una calle donde un gangs- 
ter, asomandose por la ventantlla de un cache, dis- 
para una rafaga de ametralladora. 

Tras la pausa vuelve a aparecer Louey con los 
resultados de las decisiones del ano anterior, Siem- 
pre que se hayan apartado fondos suficientes para 
cubrir ios diversos pages que se deben efectuar, el 
ano acabara con beneficios. Entonces comienza la 
siguiente vuelta, con una repetition de la rutina de 
preguntas y respuestas* 

El rnarcador del jugador se ofrece al final del 
programa en forma de porcentaje. El rnarcador de- 
pende de cuanta "pasta' 1 y cuantos clientes se 
hayan acumulado, asi corno durante cuanto tiempo 
hay a logrado sobre vivir Mugsy, 

Aparte de las pan tall as de instrucciones que po- 



se en una pequena ventana en la parte inferior que 
refleja la cantidad actual de "hampones" y "pasta 
en la caja", etc., las pan tall as se componen entera- 
mente de imagenes grafieas. Estas estan dibujadas 
en un Spectrum utilizando el paquete para graficos 
Melbourne Draw, de Melbourne House. Dado que 
una pantalla ejvalia resolution en e! Spectrum ocu- 
paria mas de seis K de memoria, es evidente que se 
debe de haber aplicado alguna tecnica de cornpre- 
sion de dates para inrxodueir el codigo en la memo- 
ria libre dispomble. 

Un examen de los graficos de Mugsy revela que 
los programadores han recurrido a numerosas tec- 
nieas para economizar espacio. Fn la mayoria de 
los cases, las imagenes estan compuestas por una 
serie de lineas rectas y el color esta aplicado con 
sumo cuidado. El empieo de instrucciones de Mel- 
bourne Draw como FILL y DRAW permite construir 
imagenes con una minima cantidad de codigo; 
DRAW, por ejemplo, solo requiere dos coordenadas 
para almacenar una linea recta, mientras que el tra- 
zado de un mapa de bits exigiria el trazado de toda 
una serie de puntos para conseguir el mismo resul- 
tado. La fonna en que el Spectrum almacena la m- 
formacidn relativa al color determina algunos de 
los m6todos que se utilizan; en la escena animada 
de la calle, surge un problema cuando un coehe 
avanza a Jo largo de la calzada mientras se ve un 
rostro que observa desde una ventana, Puesto que 
el Spectrum no permite visualizar mas de dos co lo- 
res en el mismo cuadrado de caracter, se ha recurri- 
do a una "mascara" para poder cambiar los coiores 
rapidamente. Los atributos de color (FLASH, 
BRIGHT, INK y PAPER) se retienen en un unico byte. 
Para producir una mascara de fondo se debe cam- 
biar el atributo INK, retenido como los tres bits 
menos significativos del byte. El byte se opera pri- 
mero mediante AND con 248 para establecer en cero 
el color INK, y este se vuelve a operar luego me- 
diante AND con el nuevo color INK para producir 
una mascara nueva. En re alidad el rostro cambia 
de color para igualarse al color de! coche, pero esto 
sucede tan rapidamente que se engafla al o jo y pa- 
re ce que ei color del rostro no cambia en absoluto. 

Los graficos de Mugsy son ciertamente notables, 
pero el juego propiamente dicho aburre en seguida. 
La accidn es repetitiva y el jugador aprende rapida- 
mente a manejar los diversos factores necesarios 
para permanecer en el juego, No obstante, Mugsy 
representa un buen ejemple de c6mo introducir 
graficos de alta resolucidn en un espacio limitado. 



Mugsy: Para el Spectrum de 48 K 

Editado por: Melbourne House, Church Yard, 

Tring, Herts 

Autores: Phillip Mitchell, Greg Cull, Clive Barrett, 
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RoboticaAplicaciones 



Conocer el entorno 



cComo combinar los "sentidos" del robot estudiados hasta 
ahora? Es el tema que trataremos en este capi'tulo 




Apreciar la diferencra 

El camarero- robot esti 
pro gram ado para 
distinguirentre una 
copa llenay una vacia, 
Sintetizando So que 
veen la bandejay las 
diferencias discretas da 
masa, el robot deter mi na 
en que momento debe 
"repostar" 




Cuando examinabamos los sens ores que puede uti- 
lizar un robot para obtener cierto conocimiento del 
mundo en el cual se mueve, consideramos cada tipo 
do entrada sensorial (vista, sonido. tacto) como si 
se la cmpJeara aa : :: .:.>'.. -.d^ E>:.- >.n:. an >a- 
pucsto bastantc factible si el robot tuviera solo un 
sensor; pero, en la practica, los mas perfeccionados 
disponen de varios- Para comprender su entorno el 
robot ha de ser capaz de integrar estas entradas 
sensoriales empleando cada una de el las como 
comprobacion de las otras, con el objeto de cons- 
truirse un modelo inter no del mundo circundante. 

Este hecho no deberia sorprender, porque as! es, 
al parecer, como actuan tambien los seres huma- 
nos. Nuestros sentidos no existen aisladamente: es- 
tamos utilizando de manera constante la entrada de 
un sentido como verification dc la entrada de otro, 
y la consecuencia cs la construction de una imagen 
muy com pi eta dc nucstro entorno. El mas claro 
ejcmplo dc ello nos lo proporcionan los estudios 
realizados cn person as ciegas de nacimiento a las 
que se ha dotado de vista gracias a una intervention 
quirurgica. Estos pacientes a menudo sorprenden a 
sus cirujanos por la velocidad con la cual pucden 
hacer un uso com pie to de su vista, Ello se debe a 




que los ciegos pose en un conocimiento muy exacto 
del mundo que les rodea como consecuencia dc 
poder tocar objetos. desplazarse por el y escucliar 
descripciones del entorno. Por consiguiente, una 
vez dot ados dc vision, puede n utilizar este conoci- 
miento y aplicarlo para mterpretar lo que perciben 
sus ojos. 

Para poder obtener los mejores resultados con 
los robots, debemos posibilitar la interaction de sus 
sentidos como si se tratara de los dc una persona. 
Por ejemplo, un robot disenado para asir objetos 
podria ser capaz dc cogerlos "a ciegas", pcro sera 
mucho mejor que disponga de un sistema visual, 
porque entonces podra localizar los objetos aun 
cuando esten ligeramcnte desplazados de sitio o en 
un angulo diferente a aquel en el que el robot espe- 
ra hallarlos en funcion de su programacidn. Para 
hacer esto, el robot debe const ruirse alguna clase 
de modelo interno de su entorno utilizando las en- 
trada s de todos sus sensores. Debe ser capaz de 
mirar el objeto y reconocerlo, debe posicionar 
luego su efector final y efectuar los calculos necesa- 
rios para levantar el objeto. 



Asusordenes... 

Memos creado un camarero- 
robot imaginario que debe 
sirrtetizar diversas entradas 
sensoriales para desempenar 
dtligentemente su funcion. Su 
mayor problems reside en el 
hecho de Que los invitados estan 
moviendosede manera 
constante, lo que sign if tea que 
debe actualizar su modelo 
Interno del espacio tomando en 
consideracion esia circunstancia 



Aplicaciones/Robotica 



Perception 
del robot 



AREAS DE CONOCIMIEHTO 




ENTRADA DE 
PROXIMIDAD 



AREAS DE GONDCIMIEHTO 



ENTRADA VISUAL 




BASE DE DATOS 
DE FOR MAS 



BASE DE DATOS 
[NFRARROJA 



E" : .sirac on, con cinco 
conocimiento, hay 
-re^seccibn de los cinco 
cuatro 

lones distintas de 



cuatro circulos, etc. El robot 
coteja cualquier objeto que 
tenga a la vista con la 
interseccidn de cinco 
elementos, luego mediante 



cada una de las 
interseccionesde cuatro 
elementos, y asi 
sucesivamente hasta 
conseguir una pareja 



i de intersection 

: ~i "enis os robots t:enen 
vsnasfuentes de conocimiento a 
i. : :i : on: algunas son sus 
:^7= it :aios preprogramados 
vde sluetEs de objetos comunes 
—=s "frarrojas, p. ej.), 
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ercTCEs (como el mapa 
:: ■ 7~:r if = _ externa que 
posse el robot) y unas terceras 
sooswatescfe entradas 
rotates (como proximidad y 

= :i :: Enelcaso 
if: :.i - 'conoce" 
■ picifti ji "comprende" su 

w&ssBDcm de esras areas de 
2Soeara«*oe6e : dentificar 
a* cancfer BMSiVO cualq u i er 
:: r: :.t : : i Stadel 



La iiustracion mas simple de este modelo interne 
es la del robot que salva laberintos (vease p« 1252), 
que utiliza sensores para calcular la position de las 
parcdes del laberinto, construyendo un mapa inter- 
no bidimensional a medida que va avanzando. Si 
ampliamos esta idea a un brazo, el mapa deberia 
ser tridimensional, Ai dotar de vista al robot el 
mapa tridimensional adquiere inmediatamente co- 
lores, variaciones de brillo y patrones que ningun 
sensor tactil puede detectar, Con cierta medida de 
reconocimiento de habla, el robot puede agregar 
information hablada a su modelo del mundo cir- 
cundante. 

Uno de los problemas con los que se enfrentan 
los disenadores ciberneticos que estan tratando de 
posibilitar que el robot interprets su entorno es que 
el mundo no es estatico y cambia de forma constan- 
temcnte. For consiguiente, es necesario que el 
robot, asimismo, este equipado con algun medio de 
dar cabida a tales cambios. 

Si consideramos un robot que este programado 
para llevar a cabo alguna tarea sencilla, como apilar 
ladrillos, se hace evidente la magnitud de este pro- 
blema. Si los ladrillos son de distinto tamano se los 
debe colocar uno encima de otro muy cuidadosa- 
mente. y si el centro de gravedad de cada uno de 



ellos se desplaza fuera de la superficie de la base de 
los ladrillos, toda la pila se derrumbara. Pero i,qu€ 
puede saber un robot acerca de las leyes de la gra- 
vedad? Y si la pila se viene abajo, ^ com p render a Io 
que ha sucedido y emprendera la action necesaria? 

Resolution de problemas 

Para abordar este problema existen dos enfoques 
principales. El primero es programar el robot con 
datos que incluyan un curso dc action prescrito 
para cualquier cventualidad, Esto obviamente limi- 
tara el entendimiento del robot a ciertas tareas cla- 
ramente deflnidas. El robot apilador de ladrillos se 
programara. entonces. con instructiones para ase- 
gurar que cada ladrillo se coloque exactamente en- 
cima del que se encuentra deba jo. con el centro de 
gravedad de uno situado directamente encima del 
centro de gravedad de otro. 

El segundo enfoque es el que defienden quienes 
sostienen que la unica forma de que un robot pueda 
llegar alguna vez a comprender su entorno es 
aprendiendolo por si mismo. Este es un cainpo de 
la ciencia informatica que se denomina aprendizaje 
o heunstica. Segun este enfoque, el robot se pro- 
grama para llevar a cabo una tarea determinada y 
se le proporciona realimentacion. ya sea provenien- 
tc de una persona o bien de su propio sensor, que le 
dice lo bien que lo ha hecho. En relation a esta 
realimentacion el robot modificara su propio pro- 
grama intemo (su propio modelo del mundo) con 
el fin de mejorar su rendimiento y construirse una 
u biblioteca de referenda" que le ayudara a hacer 
frente a futuras tareas. El robot que salva laberin-' 
tos actua de esta forma cuando intenta hallar la 
mejor ruta a trav£s de un laberinto. Utilizando sus 
sensores puede detectar cualquier cal!ej6n sin salt- 
da, emprendiendo la acci6n necesaria para desan- 
dar el camino y volver a intentarlo con uno nuevo. 
Lamentablemente, no existe ningun programa de 
aprendizaje que se pueda utilizar cada vez que un 
robot necesita aprender una tarea. 

Despues de que el robot ha iL aprendido" la lec- 
tion correspondiente. ha de almacenarla, sea cual 
fuere, en forma de programa para ordenador* Esta 
tarea se conoce como representation del conoci- 
miento. Tradicionalmente, el conocimiento del 
robot se puede almacenar como Imeas de codigo 
si mi lares a las de un programa comun para ordena- 
dor. Pero las tecnicas de la inteligencia artificial nan 
llevado a otros enfoques. Existe en uso una amplia 
gama de tecnicas, pero las mas comunes incluyen 
reglas de production, redes semanticas y mar cos. 

Las reglas de production responden a la forma 
de las construcciones IF. . .THEM y son simples sen- 
tencias de la realidad. Por consiguiente, un robot 
podna almacenar su conocimiento en la forma: SI 
(IF) hay una pared de ladrillos delante de ti, ENTON- 
CES (THEN) no puedes avanzar. Puede haber toda 
una secuencia de reglas de este tipo; ofrecen la ven- 
taja de ser faciles de escribir y faciles de compren- 
der para el program a dor que este escribiendo el 
programa, Pero existe el pequeno problema de que 
el robot tambien tiene que comprenderlas: necesita 
lo que suele llamarse un motor de inferentias para 
ser capaz de interpretar estas reglas como un curso 1 
de action. Los programas que utilizan reglas de 
production se pueden escribir en un lenguaje con- 
ventional, como el basic, pero lo mas comun es 




cpc se escriban en un lenguaje declarauvo^ como el 
«olog. que esta mejor disenado para tratar esta 
dase de conocimiento. Elk) se debe a que. a dife- 
rencia de los tradicionales, Jos leagpa)es dedarati- 
vo5 no ejecutan sus mstraeooeesde ma en una. En 
cambto d program bvsca ooDtmuamente un 
. ■ • :__ :; ^ se puedan 

l o bb jesfe. Gnado esto sucede, esa 
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nricas son una forma de estructu- 
! se utilizan para representar el cono- 
y se puede pensar en ellas como una red 
de relation es entre diversos elementos del conoci- 
mienro- La razon por la cual se dcnominan redes 
semanticas, en vez de simplcmente redes o grafi- 
cos. reside en que los enlaces individuates pueden 
poseer algun significado en si mismos, Un areo que 
enlace dos nudos puede ser un area que indique la 
-:±ncia de una dase e sped a I dc relation entre 

- .: nudos. For lo ianto, un nudo etiqueta- 

do "mesa" podna estar uni do a un nudo etiquetado 
■neWe". En este ejempkx la relation es que una 
mesa es un tipo de mueble; de modo que podemos 
dear que el enlace es un enlace de "tipo". 

Esta clase de representation del conocimiento se 
puede programar en un lenguaje conventional, 
i puede intentarlo empieando cl basic y repre- 
. * diversos nudos y enlaces mediante va- 
; en serie. Pero lo mas comun es utilizar uno 
: k*s knguajes de la inteligencia artificial, como el 
porque hacen que la cxpresion de estas com- 
plejas relaciones con nombre sea mucho mas sen- 
Los marcos son una especie de cuestionario en 
que se disena especificamente para cada 
i situation con la que se pueda enfrentar un 
La idea es muy facil de com p render y se po- 
4b irogramar de inmediato en basic utilizan do 
aiapks matrices en serie bidimensionales: una di- 
■Fiwarwi para la ~pregurita " y otra para las u res- 

se oooskkra que el robot no 
> acerca de una si- 
te puoios del 



: de b vepRsemxxMi del 
, del cual nemos habtado may bteve- 
aoK. es el papel que representan los lenguajes de 
mack El lisp, por ejemplo, al ser un len- 
de proceso de listas, es especialmente ade- 
i para esta clase de enfoque para el almacena- 
y la recuperation de datos. La election de 
. en consecuencia, simplificara la represen- 
; del conocimiento de detcrminadas formas* 
. : capitulo nemos analizado unos cuantos 
aefcxias para programar al robot con un entendi- 
totto mas completo de su entorno. Este tenia to- 
. r _- : >ii-ndo objeto dc considerable hivestiga- 

- :~ ±~ ' :> departamcntos de ciencias dc univcrsi- 

— - ---- i~ lodo cl mundo y los elementos clave son 
i aflizacion de sensores, la realimentacion, el 

aje y la representation del conocimiento. 
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PBOCESADOR 
DE 32 BITS 



PRDCESADOR 
HE 16 BITS 



PBOCESADOR 
DE 3 BITS 



Lineas 
paralelas 

Los datos que errtran en el 
sistema de proceso del robot 
atravesdesus sensores se 
deben procesarcon la 
suficiente rapidez para 
permitir una reaceion 
inmedtata ante los datos 
entrantes. 

La Eongitud de la cola de datos 
esta determinada por la 
complejidad del algorftmo que 
los interpreta y la velocidad de 
proceso. El vo lumen de datos 
generados por un robot 
complejo puede ser tal que un 
procesador de acho bits como 
el Z80 o el 6502 no lo puedan 
afrontar, formandose, de este 
modo, larguisimas colas de 
datos. La sol uc ion de este 
problemaesta en el empleo de 
procesadoresde 16 o 32 bits 



Caminos del conocimiento 



RED SEMANTICA 

Relaciones entie objetos 




El conocimiento se puede 
definir como la informacion 
dentro de un conlexto. Los 
ordenadores estan 
constroidos para almacenar 
informacidn pero no estan 
espectalmente dotados para 
relactonar los datos, 
convirtiendo la informacion en 
conocimiento. Por 
consipuiente, se deben 
inventar melodos apropiados 
para representar el 
conocimiento. Uno de estos 
procedimientos es la red 
semantica, que se puede 
almacenar como una lista 
encadenada; otros son los 
marcos, que son simplemente 
matrices bidimensionales; 
tambien estan las reglas de 
produccion, que son listas de 
informacion y operadores 
logicos. 

Ninguno de estos metodos es 
el ideal para representar todo 
el conocimiento, y ]as 
combinaciones de metodos 
son frecuentes. Aqui 
utilrzamos una red semantics 
para representar un 
conocimiento detallado. 
Observe que estas 
representaciones son 
estaticas 



MARCOS 

Informacion clasif icada 



ES UN TIPO 0E 



REGLAS DE PRODUCCION 

Listas aooleanas 



TIPODE MARCO; 


1 


NOMB. DEL OBJ.: 


TABURETE 


BREVE DESC: 


3 PATAS 




ASIENTO 


MATERIAL: 


MADERA 




METAL 




PLASTICO 


ALTURA TIPICA: 


0,5-1 m 


CLASIFICACION: 


MUEBLES COM 




PATAS ASIENTOS 



IF TABUR. THEN (3 PATAS WIB ASTO.)' AND (MAD. OB METAL OR PLAST.) 
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Gran macro 



Examinemos el uso de macro de teclado y otras caracterfsticas en 
el paquete «1-2-3», producido por Lotus 




La pantalla del 1-2-3 

B menij principal se trae a Ja 
pantalla pulsando la tecla /, 
oo mo en el VisiCalc 




Eccnomia a Iraves de macros 

Esta es nuestra macro para 
ascnar nombres a las 2011 as tal 
como aparece en la hoja de 
traijajo. Si fuera necesario. las 
esfrucciones de la macro se 
podrian colocar a lo largo de una 
cofumna 



Los programas de hoja electronica que hemos exa- 
minado hasta ahora han sido disenados para micros 
personates como el BBC, el Spectrum, el Commo- 
dore 64 y el Sinclair QL. Estos programas se ven 
necesariamente entorpecidos por la limitada canti- 
dad de RAM disponible para el programa en si y 
para los modelos desarrollados. Programas simila- 
Tes escritos para el IBM PC, el ACT Apricot y 
otras maquinas de oficina pueden sacar part id 0 de 
grandes memorias residcntcs y una mayor veloti- 
dad de proceso > A consecuentia de ello, algunos de 
los programas de modelos mas innovadores solo se 
pueden ejccutar en costosas maquinas de esta 
clase, Un ejemplo es el Lotus 1-2-3, un programa 
integrado de hoja electronica, base de datos y grafi- 
cos ? que estudiamos somcramente en p. 1 124. 

EI 1-2-3 impone considerables demandas de me- 
moria del ordenador por la propia naturaleza de su 
diseno, Ademas de exigir suficiente RAM para ma- 
nipular el codigo de sus tres aplicaciones principa- 
les, necesita espacio para una hoja de trabajo con 
una capaeidad maxima teorica de 256 columnas por 
1 028 filas. La memoria se le asigna a la hoja de 
trabajo solo a medida que es necesaria; pero. aun 
asf, las primeras versiones del 1-2-3 requieren un 
mini mo de 128 K solo para funcionar y las ultimas 
versiones exigen al menos 256. Los costos de un 
programa como este y un si stem a para ejecutarlo 
son sumamente onerosos. pero el resultado es un 
paquete para el usuario con una amplia gama de 
caracterfsticas. En este capitulo le enseriaremos a 
utilizar una de las facilidades mas interesantes del 
1-2-3, la macro de teclado. Pero para comprender 
las macros primero debemos examinar la forma en 
que opera este programa- 

Encendido 

Cuando se lo activa, el 1-2-3 visual iza el Lotus Ac- 
cess System, un con junto de instrucciones para la 
gestion de datos. Colocando el cursor sob re la pri- 
mera option, 1-2-3, y pulsando Return, se carga la 
hoja de trabajo en la memoria y se prepara la visua- 
lization en pantalla. Las filas del 1-2-3 estan elique- 
tadas con letras y las columnas estan numeradas. Al 
igual que en el Multiplan, que analizamos anterior- 
mente {vease p. 1244), ef 1-2-3 es activado por 
menu. El menu principal se visualiza al pulsar la 
tecla L A partir de entonces, las opciones del menu 
se seleccionan o bien digifando la primera letra dc 
la instruccion apropiada, o colocando el cursor 
sobre la instruccion y pulsando Return. 

El 1-2-3 posee tantas opciones de instrucciones 
que hay varios niveles de submenus. Esto significa 
que el usuario puede utilizarlo para efectuar ccnte- 
narcs de tare as, pero tarn bien significa que algunas 
operaciones requieren una gran cantidad de pulsa- 



ciones de teclas (vease diagrama). Para ilustrar este 
punto, tomemos un ejemplo. El 1-2-3 permite de- 
signar a una celda o a una zona de celdas con una 
etiqueta identificadora. Cuando se desea actuar 
sobre la zona designada (incluyendola en una for- 
mula, p. ej.) se empfea el nombre asignado en 
lugar de la referenda a la celda, asi: 

A3-B3=C3 VENTAS-C0STO=BENEFICIO 
refereocias a celdas referencias a nombres 

La asignaeidn de nombres a las zonas simplifica y 
aceiera la tarea de buscar cosas en una gran hoja de 
trabajo. Para asignar un nombre a un grupo de cua- 
tro celdas en el 7-2-5, se requieren las siguientes 
pulsaciones de tecla: 

/ — visualiza el menu principal: 

R(ange,serie) — le dice al 1-2-3 que se va a efectuar 

una operation sobre un pequeno grupo de celdas, en vez 

de sobre la hoja de trabajo completa; 

N(ombra — a la serie de celdas identificadas se le va a 

asignar un nombre; 

C(rear) — preparar al 1-2-3 para aceptar un nombre y 
asignarlo; 

Oigite el nombre a asignar: "COMIENZCT, por ejemplo; 
Return para aceptar la celda activa como el principio de 
la serie; 

Cursor a la derecha cuatro espacios; 

Return para aceptar la celda activa como el final de la 

serie. 

Por consiguiente. este proceso exige 10 pulsaciones 
de teclas. mas el nombre propiamcnte dicho. 

Para reducir este proceso a un numero mas ma- 
ne j able, el 1-2-3 permite el empleo de macros de 
teclado. Las macros son como programas simples, 
escritos en el lenguaje operativo del paquete. Se 
crean almacenando las pulsaciones de teclas reque- 
ridas en una pequena portion de la hoja de trabajo, 
asignandole un nombre a la position, asignando 
lu ego el nombre a una tecla especifica, A partir de 
ese momento, el 1-2-3 efectuara las pulsaciones de 
forma automatica cada vez que pulse la tecla asig- 
nada juntamente con una de funcion especial, eti- 
quetada ALT en el IBM PC y en las maquinas com- 
patibles con el mismo. 

Para automatizar el proceso de asignaeidn de 
nombres a celdas, comenzamos por destinar para la 
macro una selection de celdas de la hoja dc tra- 
bajo, Estas celdas se deben elegir cuidadosamente 
por dos motivos. En primer lugar, deben ocupar un 
espacio a salvo dentro de la hoja de trabajo, una 
zona en la que jamas se colocaran datos. En segun- 
do lugar, como hemos mencionado, el 1-2-3 solo 
destina espacio de memoria a las celdas que se acti- 
vam Una celda se activa siempre que sea senalada 
por el cursor, de modo que a los espacios vacios 
entre celdas de datos se les otorgara un espacio de 
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-i -=~oria. Por consiguiente. si colocara una 
nacro hacia la derecha. muy alejada del re>to de la 
boja de trabajo. las celdas vaaas podrian devorar 
\arios Kbytes de meinoria utifaable. Por esie mori- 
vo. a menudo es pcefaftie coiocarhs macros sobre 
It fcoya de trabajo. en las 
Si todas las formu- 
ooroo para fun- 
las aonas de las ma- 




• 



~. ,: de asignacion 
i A. Si la cantidad de pul- 
deniasiado grande conro para 
sola celda. se puede colocar a la 
i en fBas subsiguientes de la misma columna. 
el cursor a la celda A1 , realizamos las 
peisackroes de reclas necesarias: 



Em este panto, el 1-2-3 aguarda para aceptar desde 
dtriripdi^ii efe^do. Se inserta una pausa 
" >» a a o dci ii m>"i i i n eneenado entre 
C H pn™ espeiaa hasta que el 




> una palabia de direction entre paren- 
. Los rctomos de carro se indican mediante un 
. EMooces continua la macro: 

IBC(?)"(derecha) (derecha) (derecha) (derecha)' 



Ahora hemos entrado todas las pulsaciones de tecla 
que neeesitamos para asignar un nombre a una 
zona. Este es el cuerpo de nuestra macro. 

El siguiente paso consiste en asignarle un nom- 
bre a la zona con la etiqueta de una tecla, como N 
de nombre. Lamentablemente, aqui nos encontra- 
mos con un rirculo vicioso. jDcbcmos rcalizar 
todas las pulsaciones de tec I as que acabamos de en- 
trar en nuestra macro design adora de series, por- 
que aun no le hemos asignado un nombre a nuestra 
macro ni la hemos almacenado! Colocamos el cur- 
sor cn la celda A1 y digitamos: 

7 R H C \ N Return Return 

El caracter \ se utiliza para indicar que se debe pul- 
sar la tecla ALT; de modo que \ N, nombre de nues- 
tra macro, significa para el 1-2-3 ALT N. Ahora que 
ya se le ha asignado un nombre a la zona, pulsando 
ALT y N juntas se activara automaticamente la se- 
cuencia de pulsaciones de teclas almacenada. A 
partir de este punto. la asignacion dc un nombre a 
una zona se puede efectuar digitando: 

ALT— N NOMBRE Return 

k) qoe representa una enorme mejora respecto al 
proceso original, 

Este ejemplo. aunque util. representa una mini- 
ma muesrra del potential de las macros de teclado. 
Esencialmente no extsten limites en cuanto a la 
cantidad de pulsaciones de teclas ni a la cantidad o 
el tipo de operaciones que se pueden automatizar 
mediante macros. 
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Racimo de instrucciones 
del 1-2-3 

Tal como se refleja en la 
ilustracion, e! paquete de Lotus 
posee varios niveles de menus. 
Estas instrucciones eslan 
incorporadas. Otras las puede 
definir'el usuarioa traves de las 
macros de teclado 
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Conjurar el peligro 

Nos corresponde estudiar otra fase de nuestro juego: como 
desplazarse entre escenarios y enfrentarse a los "peligros" 



Ahora que ya hemos implcmentado la cstructura 
basica del juego debemos considerar los procedi- 
mientos para desplazarse de un cuarto a otro cuar- 
to. Permitircmos cuatro direcciones de movimien- 
to: norte, sur, cste y oeste. 

TO N 

MOVE "N : LISTA, SALI DAS 
END 



TOS 

MOVE 
END 



'S : LISTA. SALI DAS 



TO E 

MOVE "E 1ISTA.SALIDAS 
EMD 

TOO 

MOVE "0 : LISTA. SALI DAS 
EMD 

Un procedimiento denominado MOVER verifica pri- 
mero que el jugador se pueda desplazar en esa di- 
rection, y luego deja el verdadero movimiento para 
otro procedimiento, M0VER1 . 

TO MOVER :DIR : LISTA 
IF EMPTY? .LISTA THEN PRINT [NO PUEDE 
AVANZAR HACIA ALLI] STOP 
MAKE "SALIDA FIRST :LISTA 
IF :DIR=FIRST : SALIDA THEN M0VER1 LAST 
: SALIDA STOP 

MOVER :DIR BDTFIRST :USTA 
END 

TO M0VER1 :N0 

MAKE :N0MBRE, CUARTO DETALLES.AQUI 
MAKE "AQUI :N0 
ASIGNAR.VARIABLES 
MIRAR 
END 



to). Luego modifica HERE para un nuevo numero 
de cuarto y vuelve a asignar las diversas listas. El 
procedimiento que emplea es este: 

TO DETALLES.AQUI 

OUTPUT (LIST :DESCRIPCI0N :C0NTENID0 

IISTA.SALIDAS) 
END 

Este utiliza la primitiva LIST, que hace una lista de 
sus entradas. La diferencia entre LIST y SENTENCE 
se explica mejor a traves de un ejemplo: 

LIST [A] [B] [C] produce [[A] [B] [C]] 
SENTENCE [A] [B] [C] produce [A B C] 

Dado que queremos conscrvar los componcntes in- 
dividuals en forma de sublistas. aqui necesitamos 
utilizar LIST en lugar de SENTENCE. 

Los peligros del juego 

Por lo general, en todo juego de aventuras hay cier- 
tos "'peiigros" que evitar, como serpientes veneno- 
sas o arenas movedizas. Cuando el jugador tropieza 
con un peligro, es ncccsario activar una determina- 
da sceueneia de acciones c imped ir cualquicr posi- 
ble movimiento para salir del cuarto hasta haber 
superado el peligro. La forma en que aqui hemos 
hecho esto es agregando olra lista a nuestra rela- 
tion de cuartos, la cual contiene los nombres de 
tod os los procedimicntos de peligro c sped ales a 
ejecutar euando se penetra en ese cuarto. Por lo 
tan to. debemos definir CUARTO, 2 como [[[UD SE 
HALLA EN UNA CAVERNA OSCURA Y HUM EDA] [HAY 
UNA LUZ DELANTE DE UD]] [CAJA] [[N 5] [E 6]] [SER- 
PIENTE]], donde SERPtENTE es un "peligro". A eon- 
secuencia de este agregado a nuestra lista, debemos 
modificar el procedimiento MIRAR que ofrecimos 
en cl capitulo anterior: 
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TO MIRAR 

PRINTL rDESCRIPCION 
PRINT " 
PRINT [UD VE1 

= E7^ " . . ~ z - I! T TiADA 

ES-r: _ E_: : - : " IE, EE 

DC h~ 

z- - : E : SAuDAS 
~-E -_\ :PELIGR0S 



■■ €5 am primitiva muy poderosa del logo. 
Tama como entrada una lista y ejecuta los procedi- 
mientos que contenga esa lista. Aqui, [SERPIENTE] 
podriaser asociada a PELIGROS, dc modo que RUN 
miGROS ejecatarfa SERPIENTE, 

to peligro? 
if empty? ;peugr0s then output "false 

output "true 
e\: 

Ato necesario modificar algunos otros proce- 
tfcrcntos para tener en cuenta estos peligros: 

- -S 3 VAR. VARIABLES 
MAKE "NOMBRE. CUARTO WORD M CUART0. :AQUI 
: : JARTO THING :N0MBRE,CUART0 
---I DESCRiPCION DESCRIPCION :CUART0 
MAKE "CONTENIDO CONTENIDO :CUART0 
MAKE ' LISTA. SALIDAS LISTA. SALI DAS :CUART0 
MAKE "PELIGROS PELIGROS :CUART0 

am 

TO PELIGROS :CUART0 

OUTPUT ITEM 4 :CUART0 
E\E 

I 10 OETALLES. AQUI 

OUTPUT (LIST :DESCRIPCION :C0NTENID0 
USTA.SAL1DAS :PEL!GROS) 



ROT {NO PUEDE 




Ahora MOVER impide todo movimicnto hasta que 
PELIGROS sea [ ]. Al preparar los peligros de esta 
forma podemos utilizar el mismo peligro en nume- 
rosos cuartos, y desplazarlo de cuarto en cuarto 
simplemente alterando las descripciones de estos. 

Ahora podemos emplcar los procedimientos que 
hemes desarrollado aqui para construii un juego de 
aventuras completo llamado El santuario de Zol- 
toth. En este juego el aventurero va en busca del 
cetro de Gilgesh, que ha sido robado por los sumos 
sacerdotes de Zoltoth y escondido en su templo 
subtenaneo* El aventurero empieza el juego para- 
do junto a la entrada de una cueva subterranea que 
conduce al santuario de Zoltoth. Cuando uno dise- 
na un juego propio, puede comenzar por formular 
por escrito un cscenario para un rccorrido de exito 
a t raves del juego, y estructurar el juego al rede dor 
del mismo, Nosotros aqui no proportionates el es- 
cenario, de modo que usted esta a tiempo de inten- 
tar construirlo si asi lo desea. 

El siguicntc paso consiste en pi a n if i car el juego 
en terminos de "cuartos", es decir, e scenarios den- 
tro del juego, su contenido y posiciones en relation 
unos con otros. Hste trazado del mundo de fantasia 
se utiliza hie go para definir los escenarios en el pro- 
grama, dando las salidas posibles desde cada esce- 
nario. Los aventureros, a su vez, habran de trazarse 
un mapa a medida que vayan avanzando. 

Ahora necesitamos decidir acerca del voeabula- 
rio que se empleara en el juego: ^que palabras ex- 
presadas por el aventurero podra comprender el 
programa? Nosotros aceplaremos: 

1. Siete instrucciones compuestas por una sola pa- 
labra: EMPEZAR, MIRAR, N, S, E, 0, e INVENTARIO 
(tod as cllas fueron descritas en el capftulo ante- 
rior). 

2. Instrucciones de dos palabras compuestas por 
un verbo se^uido de un sustantivo. Los verbos son; 
COGER, DEJAR, EXAMINAR, MATAR, FROTAR v 
ABRIR. Los sustantivos son: ESPADA, COFRE, 
CETRO, ANILLO y SERPIENTE. 

To das las instrucciones se le digitan di recta men te a I 
logo. Si se las reconoce. se obcdcccran; pero si no 
se las reconoce. entonces el usuario obtendra un 
raensaje de error del logo. 

Sn embargo, seria rnucho mejor ofrecer men- 
sapa de error safes como "No conozco esa pala- 
fe**~- £■ *cz de los TiFiaji ■ . de error esian dares 
dkiMCDL ParifcifirT es» ii e aa i iani osun ex- 
Icoqrqwe lecop bts rwrraffcis. compruebe si son va- 
\ A ly^ s fas execute. He aqui una forma de 



hacer esto para e) vocabulario que hemos definido 
hasta ahora: 

TO EMPEZAR 

MAKE "AQUI 1 

MAKE "IMVENTARIO [] 

ESTABLECER.CUARTOS 

ASIGNAR. VARIABLES 

MIRAR 

JUEGO 
EMD 

TO JUEGO 

PRINT1-"INSTRUCCI0N: 

MAKE "ENTRADA REQUEST 

IF VALIDA? :ENTRADA RUN :ENTRADA ELSE 

PRINT [NO COMPRENDO] 

JUEGO 
END 

TO VALIDA? :INSTR 

IF ((COUNT :INSTR)=1)THEN OUTPUT 
VAL1? :!MSTR 

IF ((COUNT :INSTR)=2)THEN OUTPUT 
VAL2? : I IMSTR 
OUTPUT "FALSE 
EMD 

TO VAL1? : IMSTR 

IF MEMBER? FIRST :INSTR [INV 0 E S N 

MIRAR EMPEZAR] OUTPUT "TRUE 

OUTPUT "FALSE 
END 

TO VAL2? :INSTR 

IF ALLOF VALV? FIRST JNSTR VALN? LAST 

:INSTR OUTPUT 'TRUE 

OUTPUT "FALSE 
END 

TO VALN? :SUSTANTIVO 

IF MEMBER? :SUSTANTIVO [ESPADA COFRE 
CETRO ANILLO SERPIEMTE] OUTPUT "TRUE 
OUTPUT "FALSE 

END 

TO VALV? :VERB0 

IF MEMBER? :VERBO [COGER DEJAR EXAMINAR 
MATAR FROTAR ABRIR] OUTPUT "TRUE 
OUTPUT "FALSE 

END 



El programs 



Primero debe entrar todos los proaidimienlos que 
ofrecimos en el capitulo anterior (vease p. 1255). 
Para empczar el juego, O para reiniciarlo en cual- 
quier momento, digite EMPEZAR. 

TO EMPEZAR 

MAKE "AQUI 1 

MAKE "INVENTARIO [ ] 

ESTABLECER.CUARTOS 

ASIGNAR. VARIABLES 

MIRAR 
END 



ESTABLECER.CUARTOS 
acuerdo al mapa. 



establece los cuartos de 



CUEVA OSCURA Y HUMEDA]] [] [[S 3] [E 4] 

[61]] Di 

MAKE "CUART0.3 [[[UD SE HALLA EN UNA 
CUEVA OSCURA Y HUMEDA]] [] [[N 2] [E 5]] []] 
MAKE "CUART0.4 [[[UD ESTA EN UNA GRAN 
CAMARASUBTERRANEA]] [] [[N 6] [S 5] [0 2]] 
[ATAQUE.SERPIENTE]] 
MAKE "CUART0.5 [[[UD SE HALLA EN UNA 
CUEVA OSCURA Y HUMEDA]] [ESPADA] [[N 4] 
[0 3]] []] 

MAKE "CUART0.6 [[[UD SE ENCUENTRA EN UNA 
HABITACION DE UN SANTUARIO SAGRADO] [EN 
UN NICHO DE LA PARED NORTE] [HAY UN 
ALTAR]] [] [[N7] [S 41 [E 8]] [PUERTA]] 
MAKE "CUART0.7 [[[UD ESTA PARADO JUNTO] 
[AL ALTAR DE ZOLTOTH EL DORADO] [ENCIMA 
DEL ALTAR ESTA ESCRITO:] ["NO DEJEIS 
ACERCAR NINGUN METAL BASE"]] [ANILLO] [[S 
6]][J] . 

MAKE "CUART0.8 [[[UD SE HALLA EN UNA 
CUEVA OSCURA Y HUMEDA]] [] [[S10] [E 9] [0 
6]] [ATAQUE.SERPIENTE]] 
MAKE "CUART0.9 [[[UD SE HALLA EN UNA 
CUEVA OSCURA Y HUMEDA]] [CETRO] [[S 11] [0 

8]] []] 

MAKE "CUART0.10 [[[UD SE HALLA EN UNA 
CUEVA OSCURA Y HUMEDA]] [] [[N 8] [E 11]] []] 
MAKE "CUART0.11 [[[UD SE HALLA EN LA 
SACRISTIA DEL] [SACERDOTE DE ZOLTOTH EL 
DORADO]] [CETRO] [[N 91 [010]] []] 
END 



Complementos al logo 

Algunas versiones de logo MIT no poseen EMPTY?, 
ITEM, COUNT ni MEMBER? En los capitulos anteriores 
(pp, 1234 y 1255} hemos ofreeido definiciones para 
las mismas. En las versiones LCSI utilice: 

EMPTYP por EMPTY? 
LISTP por LIST? 
MEMBERP por MEMBER? 
TYPE por PRINT1 
AND por ALLOF 
OR por ANYOF 

La sintaxis IF en el logo LCSI queda detnostrada 
mediante ese ejemploi 

IF EMPTYP ;C0NTENID0 [PRINT [NADA 
ESPECIAL]] [PRINT ;C0NTENiD0] 

Si la condition es verdadera se ejecuta la primera lista 
despues de Sa condicion; si la condition es falsa, se 
ejecuta lasegunda. 

En el logo Atari utilice SE en lugar de SENTENCE, RL 
para REQUEST, y observe que ITEM no esta 
implementada. 



TO ESTABLECER.CUARTOS 
MAKE ' CUART0 .1 [[[UD ESTA PARADO JUNTO A 
LAENTRADA] [DE UNA CUEVA]] [] [[E2]] []] 
MAKE "CUART0.2 [[[UD SE HALLA EN UNA 
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Commodore 16/Hardware 



Sucesor del Vic-20 

Demos una atenta rnirada al Commodore 16, ordenador 
perteneciente a la "nueva generaciorT lanzada por su firma 



> pasiblemente para sustituir al Vic-20, con 
sb nmtuscula memoria de 3 583 bytes, el 16 com- 
paite con el Plus/4 un basic muy potente, que com- 
pkmenta las instrucciones basic para tratamienlo 
de discos existentes en maquinas como el CBM 
8296 con un conjunto de instrucciones para graficos 
y otras simples para sonido, haciendo al mismo 
riempo un gesto stmbolieo hacia la prog ram a c ion 
estrucmrada con construcciones como DO,., WHILE 
yLOOP...UNTIL. J .EXfT. 

iiferencia del Plus/4, que posee un teclado y 
mm carcasa radicalmente disu'ntas a cualquicr otra 
qneliaya producido Commodore con anterioridad, 
el 16 se suministra en una carcasa similar a la de los 
prime ros model os Vic y 64, si hi en el esquema de 
: ' r es diferentc (color carbon, con teclas gris 
cteo) y se ha modificado la disposicion de las te- 
Las teclas son grandes, estan bien situadas y 
- .fnun tacto firmc y profesional, como el de las 
asaqtitnas que precedieron al 16. Una mteresante 
■movacion cs la inclusion de una tecla HELP (en 
iealidad la tecla de funcion F8), que ayuda al usua- 
rio. cuando el pro grama se intcrnimpe, con un in- 
fonne de mensaje de error, visualizando la tinea 
fpe contiene ei error e iluminando de forma inter- 
: la parte incorrecta. En las lineas de senten- 
miMtipIes, los caracteres se iluminan intermi- 
ente desde el error hasta el final de la Hnea; 
! mucho mas util que la iluminacion se restrin- 
i al error propiamente dicho (p. ej . . PRONT por 



en contra 



del 



i iii rr nf r con ei primero apartandose del tipo de 
~ . . ' : Dde nueve patillas que por lo general se 

coosidera estandar. Los conectores para interface 
de disco y para pant alia son, no obstante, identicos 
a los del 64. 

De los cambios negatives y en cuanto ataric al 
programador de juegos, cl mas grave es que no 
aisten sprites. Aunque el Vic-20 tampoeo los 
: utilization en el Commodore 64 (y en 
de la compctencia) ha acostumbradO 
- usuarios a su cmpleo para la manipula- 
seneilla de fonnas graficas, que esta parece 
oinosa omisiom 
Al coneetarse el equipo, la pant alia ofrece la ya 
tamihar visualization Commodore, con la dife reli- 
ef de que el basic indicado cs la version 3.5, y que 



bay 12 277 bytes de memoria disponibles. Til basic 
3.5 es en realidad la quinta version que se escribe 
para maquinas Commodore. La version original, 
1.0, no contenfa instrucciones para tratamiento de 
discos, y estas cran muy torpes en la version 2, que 
por algun motive? fue la version que se incorporo en 
el Vie-2fl y el Commodore 64. Hacia marzo de 
1980, la version 2 habia sido superada por la ver- 
sion 4, que es un basic muy eficaz escrito para los 
ordenadores de la serie Pet de 80 columnas, el 
8032, 8096 y ahora el 8296. 

La version 3.5 es casi identica al basic 4, con 
unas cuantas instrucciones extras. En conjunto, la 
nueva version posee unas 50 instrucciones y funcio- 
nes mas que las que ofrecia el Vic, incluyendo ins- 
trucciones de ayuda utilizadas para escribir y depu- 
rar program as, caracteristicas de programacidn es- 
tructurada, instrucciones para graficos y sonido. 

La instruccion directa MONITOR invoca a Ted- 
mon, el monitor residente (al cual tambien se 
pucde acccdcr mediante SYS 4, como en la serie 
Pet), Hste emplca instrucciones mnemonicas dc 
una sola letra; por cjemplo C, que compara dos sec- 
clones de la memoria e inform a sobre las diferen- 
cias, y S y que guard a en cinta o en disco. 

Las rut in as kernal basieamente no ban sido mo- 
dificadas. Hstas rutinas, que se llaman desde codigo 
maquina, gobiernan el tratamiento de las rutinas de 
entrada y salida. No obstante, se ha agregado en 
$FF81 la funcion IQINIT del 64, para inicializar los 
dispositivos de entrada/salida (y especialmente los 
cartuchos dc program as). 



Commodore 16 

Destinada a sustituir a I Vic-20 en 
la Ifnea de Commodore, la nueva 
maquina posee 16 K de memoria 
y un basic perfeccionado. El 
Commodore 1 6 es compatible 
con el Plus/4 tanto en software 
como en enchufes, pero no asf 
con las maquinas Commodore 
mas antiguas. el Vic-20 y el 
Commodore 64 




Chris Stevens 
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Graficos 

La palilalia de alta resolution, trazada por mapa de 
bits, tiene unas dimensiones de 320 por 160 pixels, 
y la pantalla de colores multiples da una resolution 
de 160 por 160. La instruction de modo GRAPHIC es 
obviamente mas rati! de invocar que las PEEK y 
POKE del 64, asi como la pantalla dividida, si bien 
con esta el texto que da limitado a las cinco line as 
inferiores. No obstante, en una pantalla para grafi- 
cos se puede colocar texto en cualquier sitio me- 
diante el empleo de la sentencia CHAR, de modo 
que 

CHAR 1 ,0,0, "ESTA ES LA LINEA SUPERIOR" 
se impnmira a lo largo de la parte superior de la 
pantalla, siendo 1 el color seleccionado, y aludien- 
do los dos ceros a las posiciones de columna y fila. 
La serie se puede imprimir en video invertido si se 
la seriala con un \T; esto se desactiva mediante 
\0\ Cualquier error de sintaxis en alguna de las 
modalidades para graficos devolvera al usuario a 
GRAPHIC 0, la pantalla de "texto puro", 

La instruction DRAW es una especie de compro- 
mise) cntrc las Kneas rectas > bastante limitadas, dis- 
ponibles en el Amstrad, y la DRAW MSX similar al 
logo, Por ejemplo, se puede dibujar un cuadrado 
mediante: 

DRAW, 10,10 TO 10,60 TO 60,60 TO 60,10 TO 10,10 

En este caso no esta definido el primer parametro, 
de modo que el color del cuadrado sera el ultimo 
color establecido. Este color se puede modificar in- 
scrtando cl valor que intercse, Existe asimismo una 
instruction BOX (caja) , que se utiliza especifi came ri- 
te para dibujar rectangulos especificando las posi- 
ciones de los cuatro vertices, con un parametro de 
4l relleno^ para pintar la caja con un color. 

La instruction CIRCLE dibuja elipses, octagonos e 
incluso rombos y triangulos ademas de circulos pro- 
piamente dichos, a tenor de los parametros que se 
especiflquen. Las form as no circu lares se eligen es- 
pecificando angulos de 120° entre segment os para 
un triangulo, 90° para un rombo y 45° para un octa- 
gono. EI valor por defeeto es 2°. PAINT rellenara la 
forma asi creada, ya sea con el mismo color que la 
forma esbozada o bien con un color de primer 
piano definible, y las formas se pueden guardar 
(SAVE) o recuperar desde disco mediante cl empleo 
de las instrucciones SSHAPE y GSHAPE. 

Los colores se especifican desde basic asign an do- 
les uno dc cntrc 16 valores al fondo, primer piano, 
multicolor 1, multicolor 2 o borde, con un parame- 
tro de brillo optional dc 0 a 7. El brillo por defeeto 
es 7 (el mas intenso). En todas las instrucciones 
para dibujar, cl parametro de color se debe escogcr 
entre una de las cinco areas ya definidas. 



Sonido 



Despues del nivel de sofisticacion de las instruccio- 
nes para sonido del chip SID (Sound interface De- 
vice) del 64, el sonido dc los can ales del Commodo- 
re 16 es mas bien una deception, especialmcnte 
dado que la actual generation de maquinas compe- 
titivas, que utilizan el chip de sonido de General 
Instruments (Amstrad, MSX, Einstein), ofrece tres 
can ales mas ruido. 

Sin embargo, la instruction SOUND no exige la 
colocacion (POKE) de cifras en las posiciones 54272 




CQntroEadardeentrada/saEida 



ROM "kefnal" 

Este chip retiene fas rutinas de 
software para el control de E/S y 
la administration domestica 
general 




Chip devitfenTMS 4416 



RAM 

Este es el unico chip de RAM. de 
16 K. del Commodore 16 



Bien venido el cambio 



Al cabo de numerosas quejas formuladas por 
programadores eR relation a las deficiencias de 
sus ROM de basic, final mente Commodore ha 
editado una version comparable a aquellas que ya 
son habituales en otros micros personal 
Todas las adiciones son bien venictas. 
Inexpticablemente, los procedimientos definidos 
por el usuario se han omitido en esta version de 
basic, que, con esta salvedad, yaes aceptable. 
Las nuevas instrucciones, incluidas las del basic 
4, son las siguientes: 



Funcianes Ayuda 


Estructura 


Graficos 


Del basic 4 


RGR 


AUTO 


DO 


GRAPHIC 


DIRECTORY 


RGCL 


TRON 


WHILE 


SCNCLR 


DSAVE 


RLUM 


TROFF 


LOOP 


PAINT 


DL0AD 


JOY 


HELP 


UNTIL 


CHAR 


HEADER 


ROOT 


MONITOR 


EXT 


BOX 


SCRATCH 


INSTR 


DELETE 


ELSE 


CIRCLE 


COLLECT 


DEC 


RENUMBER 


PUDEF 


GSHAPE 


COPY 


HEX$ 


KEY 


USING 


SSHAPE 


RENAME 


SOUND 


ERRS 




DRAW 


BACKUP 


VOL 


TRAP 




LOCATE 






RESUME 




COLOR 
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COMMODORE 16 





CPU 7501 

Se trata de una variacttfn 
Commodore del 6502 



Chip TED 

Este chip alberga el monitor 
residents e interact ila con la 
CPU para el control general del 
si stem a 





76,2 x 203 v 2x 406,4 mm 



MOS 7501, 0,89 a 1,76 MHz 



16 K de RAM (12 K de memoria 
para usuario), 32 Kde ROM 



Texto: 25 filas de 40 columnas. 
GrStos: 320 por 160 pixels. 
Ciaco modalidades: texto, alta 
resolution, alta resolution con 
cinco Ifneas de texto, multicolor, 
multicolor con cinco Imeas de 
texto, 15 cotores x 8 niveies de 
brillo, mis negro = 121 tonal. 



Puerta en serie Commodore, 
ranura para ampliation de 
cartucho de ROM/memorta, 
puerta para interface de unidad 
de cassette (8 patitias), 2 puertas 
para palanca de mando (8 
patillas), salida para pantalla: 
compuesto/cromlnancia/brillo/ 
audio, salida RF con interrupter 
para regulation aito/bajo, entrada 
alimentation electrica (9 V) 



Interprete de basic 3.5 en ROM, 
75 instrucciones, inclrjyendo 
trazado complete de graficos 



Tipo maquina de escribir, 66 
tec las, inclEiyendo 7 tec las de 
funcidn reprogramables y HELP 



basic avanzado T instrucciones 
excelentes para tratamiento de 
discos, instrucciones simples 
para sonido y para graficos, facil 
acceso a la pantalla para 
programacion en lenguaje rnaq. 



No es compatible con los 
equipos previos de CBM, razrjn 
por la cual dispone de muy poco 
software Conectores de E/S 
incompatibles; no posee sprites 



a 542%. al igual que en el 64. Si se conoce la fre- 
cuencia de una not a, puede buscarse en una labia 
del manual y utilizar la cifra prop ore ion ad a para 
definir la nota a reproducir. For ejemplo: 

SOUND 1,770,60 

ward la nota la (a una frecuencia de 440 Hz) du- 
rate 60 sesentavos de segundo (cs deeir, un segun- 
i>» en el canal uno, 

H sonido mas bajo que se puede ej ecu tar es la 
dosoctavas por debajo de do central (110 Hz), y el 
■as alto es sol dos octavas arriba de do central 

:"5 Hz), dando una envergadura musical total 
de cuatro octavas. Hay disponibles dos canales de 
musica (1 y 2) o un canal de musica (I o 2) y un 



canal de ruido bianco (.3). Am bos canales est an 
com bin ad os, dado que la serial de salida de audio 
es mono, y no exist e ninguna manera de sepacarlos. 

El Commodore 16 es una maquina atractiva, con 
un basic muy avanzado y buenas instrucciones para 
graficos, pero sus facilidades para sonido son bas- 
tante primitivas, aun comparandolas con las del 
Vic-20, si bien en la nueva maquina son mas faciles 
de ejecutar, 

Fn el mo men to de su lanzamiento, era muy poco 
el software exist en te para el Commodore 16. A los 
posee dores de Vic 20 que deseen superar y poner a I 
dia sus expectativas en informatica adquiriendo 
esta maquina, se les debe advert ir que en la misma 
no se ejecutaran sus antiguos program as. 



Programacion/Juego de aventuras 

La linea de la trama 

Llegados a este punto, desarrollaremos una utilidad que nos 
permitira formatear la salida a la pantalla de los juegos creados 



Visualizacion en formation 

La rutina para formatear la 
pantalla que utilizan Digitaya y El 
bosque encantado permite 
formatear cualquier salida en 
pantalla de mo do que no se 
produzcan cortes de palabras. 
Mediante el empleode las 
variables OWS y NWS, la rutina 
va " buscando" con una palabra 
de antelacion respecto a la que 
se esta visualizando. Si la 
siguiente palabra va a superar la 
longitud de tinea establecida, se 
omite el punto y coma que 
sup rime un retorno de carro, 
haciendo que se inicie una Imea 
nueva 



Dado que tanto Digitaya como El basque encanta- 
do son aventuras basadas en texto, emplean pala- 
bras para describir los escenarios y los aconteci- 
mientos. Pasar esta information a la pantalla utili- 
zando sentencias PRINT seria poco elegante. Por 
ejemplo, una sentencia PRINT cuya longitud supcrc 
a la de una linea de la pantalla continua en la linea 
siguiente, eon frecuencia dividiendo en dos aque- 
ilas palabras que quedan al final de la linea de pan- 
talla. Una laboriosa forma de abordar este proble- 
ma sen a considerar cada sentencia PRINT del pro- 
grama de forma individual y formatear " manual - 
niente" la salida de mo do que no se cortaran las 
palabras del final de cada linea. Kilo no representa- 
ria mayor problema si solo hubiera de hacerse en 
unas pocas ocasiones, pero en un programa para un 
juego de aventuras ello sera neccsario en innume- 
rables ocasiones. La alternativa es disenar una ruti- 
na que nos formatee la salida. Para cmplcar una 
rutina de este tipo debemos ser cap aces de pasar la 
frasc que descamos formatear a la rutina a t raves 
de una variable en serie, y la rutina debera encar- 
garsc del form a tea do y de la salida. 

Tanto Digitaya como El basque encantado utili- 
zan una rutina especial para formatear su salida, de 
mode que antes de seguir describiendo la progra- 
macion del juego sera mejor que analicemos como 
trabaja esta rutina. Este es el listado para E! 
basque \ . . 



5SQ0 rem ' 

5510 LC-0: 

5520 OC-1; 

5530 m$="": 

5540 LL-40; 

5550 SN$=SN$+ 

5560 PRINT 

5570 FOR C=1 TO LEN(SNS) 



S/R FORMATEAD0 DE SALIDA **** 
REM C0NTAD0R CAR/LINEA 
REM VALOR INICIAL COMTAD0R ANTEGUO 
REM VALOR INICIAL PALABRA ANTIGUA 
REM LONGITUD LINEA 
FICTICIA 15 



55S0 LC=LC+1 

5590 IF MID$(SN$ P C,1) = " " THEN G0SUB5800 
5600 NEXT C 
5605 PRINT 
5610 RETURN 

5620 : 

5800 REM " S/R CONTROL FfNAL DE LfNEA " 

5810 NWS = MIDStSNS.OC. C-0C+1):REM NUEVA PALABRA 

5820 IF LC<LL THEN PRINTQW$;:G0T0584G 

5830 P^INT0WS:LC=L£N[NWS) 

5840 0C=C+1:0W5=NWS 

5850 RETURN 

En primer lugar, la rutina busca a traves de la frase, 
que le ha sido pasada por la variable SN$, un carac- 
ter espacio. Cada vez que encuentra un espacio se 
llama a la subrutina de la linea 6020. Esta subrutina 
lleva a cabo varias tareas importantes, Utilizando 
OC para indicar el comienzo dc una palabra (inicial- 
inente, OC esta establecida en 1), y C para llevar el 
regis tro del caracter que esta siendo objeto del exa- 
nien, se puedc aislar la palabra que se ha encontra- 
do antes del espacio utilizando JVIIDS y almacenarla 
en NWS (por New Word: palabra nueva). Antes de 
visualizar en la pantalla el contenido de NW$ V el 
mlsmo se transfer! ra a OWS. 

Se emplea un contador de Imea, LC, para con tar 
cuantos caracteres se han utilizado hast a el memen- 
to en cualquier linea dada, cantidad que se verifica 
en la linea 6040 para asegurar que sea inferior a la 
longitud de linea permitida, LL. De ser este el ease, 
entonces se imp rime OWS, seguida de un punto y 
coma para asegurar que cualquier salida que venga 
a continuaeion continuara en la misma Imea, Si LC 
si fuera mayor que LL, nuevamente se imprimina 
OWS, pero en esta ocasion omitiendo el punto y 
coma (y, por tanto, cualquier salida que venga a 
continuaeion empczara en una lfnca nueva). Adc- 
mas, LC, el contador de linea, se vuclvc a establccer 
en la longitud de la palabra nueva. 
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SALIDA F0RMATEADA 



OWS -"FLEECE* 
NW$ = 'WAS* 



OWS - "WAS* 
NWS = "WHITE** 



0WS = "WHITE*" 
NWS -"AS* 



LC 



LC 



1 2 3 4 5 6 7 ft 9 10 ft 12 13 14 15 16 17 18 19 20 21 2223242S26272fl2930313233343$3S3738 

MARY HAD A LITTLE LAMB ITS FLEECE WAS 

flj (21 m (4) P) 6 7 8 9 10 11 12 13 14 

WHITE AS SNOW 
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Juego de aventuras/Programacidri 



Veamos ahora como funciona esta submtina en 
la practica. La rutina explora la frase a fonnatear. 
en busca de un espacio. Cuando eocuentra uno. se 
vuelve a designar los caracleres eotre el espacio y la 
ultima palabra haHada corao si kxmaxan una nueva 
palabra- La nUiB^ cm efecso. busca palabras con 
una palaU* de artrfaoo icspecto a la que se esta 
1 1 niiTMitri La nin compnieba si la longitud 
wmm dr pa*a£r^ se ha superado cuando agrega a 
^ iasL Je pwnfr d nuevo termino. Si asf fuera, la 
rzmsszsxs apt se inkie una linea nueva. For consi- 
^e*. se evita la separation de las palabras del 
fcalde cada linea. La adicion de " FICTICIA 1 ' al final 
de la trase es importante, ya que representa una 
ultima palabra a almacenar cn MWS. Los espacios 
antes y despues de " FICTICIA " son significativos: el 
primero la convierte en una palabra separada y el 
ultimo proporciona un espacio final a detectar por 
la rutina. 

Tomcmos a modo de ejemplo la oracion "Mary 
had a little lamb; its fleece was white as snow" (Mary 
tenia un corded to; su vellon era bianco como la 
nkve). La anchura de pantalla que utilizaremos es 
de 40 caracteres. Si no se formateara la oraci6n ? la 
palabra white se se pa ran a en dos, con las letras tie 
empezando una linea nueva. La rutina de forma- 
teado, sin embargo, torn a dos palabras de la ora- 
. cada vez. Si consideramos las dos que prece- 
den a white i entonces fleece se almacenara en OWS 
j as en NWS. Habiendo com pro bade que el conta- 
_ r, lC, no super a la cantidad de 40, se imprime 
C iVS- seguida de un pun to y coma; was se transfiere 
entonces de NWS a 0W$ y la rutina continua cxplo- 
rando la frase, y se encuentra con el termino while. 
En este pun to, el con tad or LC ex cede de 40, lo que 
indica que white cae en un final de linea. Da da esta 
smiadom OWS (que ahora contiene la palabra was) 
isualiza igualmente pero sin el pun to y coma. 
Ademas. se reesiablece el contador LC en la canti- 
dad de caracteres de este termino. La palabra white 
_nsfiere a OWS. para la subsiguiente impresidn 
de una nueva Unea . 

Comprobacion de la rutina 

m W^kmm ^^cCr m fc ^ ^ ---- ~* 



my} aB^'AL DESPEHTARTE DE UN PRDRMDO SUEML EL " 
»SHS=SK5 5 E [ I EL BOSQUE ESTA SUAVE YSECO * 
» SNS=-TU NO SABES COMO HAS LLEGADO HASTAAQU1 * 
1070 SNS=SN$+ u PER0 SABES QUE DEBES LLEGAR AL " 
" -V 5NS=SN$-"P0BLA00 QUE HAY A LAS ARJERAS DEL BOSQUE 
PARA " 

10QO SN5=SNS+ S, ESTAR A SALVO." 
- - ■ : GQSUB5500;REM FORM ATE AR 
PRINT 

-rj SN$="ECHASUNA MIRADAATU ALREDED0R PARA ORIENTARTE " 
" " V 30SUB5500:REM F0RMATEAR 

•_■ PRINT; PR IMF PULSA CUALQUIER TECLA PARA C0MENZAR" 
"50 GETASJF A$=" " THEN 1150 
1160 PRINTCHR$(147);REM LIMPIAR PANTALLA 
U7C RETURN 

Para llamar a la subrutina "Historia hasta ahora" 
hemos de emplear estas line as: 

205 GOSUB 1000; REM HISTORIA HASTA AHORA 
990 END 



Listados para "Digitaya" 

1110 GOSLFB1250:REM HISTORIA HASTA AHORA 
1270 END 

1290 REM **** HISTORIA HASTA AHORA * * ** 
1300 SNS= ,L BIEN VENIDQ A 'DIGITAYA' 
1310 GOSUB5fi80:REM FQRMATEAR 
1320 PRINT 

1330 SN$= U MIENTRAS LA MAQUINA SUSURRA QUEDAMENTE. 

ECHAS UNA MIRADAEN DERRED0R. 1 ' 
1 340 SNS=SNS4- " HACIA EL NORTE Y HACIA EL SUR SE EXTIENDE 

UNA ANCHA AUTOPISTA." 
1350 SNS=$NS + "' TU MISI0N C0NSISTE EN ENC0NTRAR AL 

MISTERI0S0 DIGITAYA' 1 
1360 SN$=SN$+" Y SACARLO ATRAVES DE UNA DE LAS 

PUERTAS DE SALIDA PARA PONERL0 A SALVO . 11 
1370 SN$=SN$+'\. PERO POR CUALDE LAS PUERTAS?" 
1380 GOSUB5880 

1390 PR I NT: PR I NT' 1 PULSA UNA TECLA PARA C0MENZAR" 
1400 GETAS: I FA$= " "THENI 400 
1410 PRINTCHRS(147):REM LIMPIAR PANTALLA 
1420 RETURN 

5880 REM **** S7R IMPRESIDN FORMATEADA **** 
5890 LC=0: REM CONTADOR CAR /LINEA 
5900 00=1 : REM CONTADOR ANTIGUO 
5910 0WS^ fl "i REM PALABRA ANTIGUA 
5920 LL=40;REM LONGITUD LINEA ANTIGUA 
5930 SNS = SN$+' L FICTICIA " 
5940 PRINT 

5950 FORC+1 TOLENfSNS) 
5960 LC=LC+1 

5970 IF MIDS(SN$,C,1)^ Jl 11 THENG0SUB6020 
5980 NEXTC 
5990 PRINT 
6000 RETURN 
6010 : 

6020 REM S/R COMPROBACION FINAL DE LINEA **** 

6030 NWS-MIDS(SNS,0C,C 00 + 1) 

6040 IF LC<LLTHENPRINTOWS;:GQT06060 

6050 PRINT0W$:LC=LEN(NWS) 

6060 QC=C+1:0W$=NWS 

6070 RETURN 



Complementos al basic 

Spectrum: 

Para el listado de Digitaya, introduzca estas 
modificaciones en la Rutina de Formateo: 

Reemplace SN$ por S$, OWS por 0$, NWS por NS 
5920 LET LL=32:REM LONGITUD LINEA 
PANTALLA 

5970 IF S$(C TO C) = " n THEN GOSUB 6020 
6030 LETN$=SS(0CT0C) 

En la subrutina Historia,.. sustituya SNS por S$ 
1400 IF »IKEYS= ^ THEN 1400 

~ : :_s 

ted isbdo de Bbosque&xantado, reemplace 
:s :f £s = f s £- sens y 

fludKooc estas Inc3sr 
5540 LET LL=32:REM LONGITUD LINEA 
PANTALLA 

5590 IFSS(C TO C)=' ! " THEN GOSUB 5800 
5810 LETN$=S$(0CT0C) 

y 

1150 IFINKEY$=""THEN1150 
1160 CLS 

BBC Micro: 

Para la subrutina Historia Hasta Ahora, se deben 
introduce en Digitaya estos cambios: 

1095 MODE 1 
1400 AS = GETS 
1410 CLS 

y en El bosque encantado: 
1160 CLS 



Exocet 



El mortifero misil Exocet, que alcanzo notoriedad durante la guerra 
de las Malvinas, es el protagonista de este juego escrito para el 
Commodore Vic 20 



Un portaaviones enemigo se ha aventurado por las 
aguas territoriales de su pais y haee caso omiso a 
sus requerimientos. A los mandos de su Mirage 
2000, debe destruirlo antes de que constituya una 
amenaza para su base. Para disparar pulse una 
tecla cualquiera. 



10 rem"******** 
20 REM * EXOCET 4 
30 REM ********** 
35 GOSUB 2000 
40 GOSU8100O 
100 PRINT TAB (A) AS 

105 IF B>17 THEN PRINT TAB(1 8)N2$;CHRS(1 9);:BB 

=0;GOTO 120 
110 PRINT TAB{B)BS; 
120 A=A-1 

130 IF A<0 THEN PRINT D$+N2$+CHRS{19);:A-19 
140 BB=BB i-Q.2 
150 B-ENT(BB) 
160 GETXS 

170 IF X$<> K ,f AND EX- 0 THEN EX-A+7923:NX-NX-1 

130 IFEXoOTHEN 300 

190 FOR 1-1 TO 10 

200 NEXT j 

210 GOTO 100 

300 EX-EX+21 

310 IFEX>8184THEN40G 

320 C=PEEK{EX) 

330 IF Co 32 THEN G0SUB 700 

340 P0KEEX-21.cn 

350 POKE EX,CX 

360 P0KEEX+M,XC 

370 GOTO 100 

400 P0KEEX-21,CN 

410 EX=0 

420 IF NX-0THEN 500 
430 GOTO 100 
500 PRINT CHR$(1 47) 
505 IFS>RTHEN R=S 
510 GETXS 

515 IFXSo"" THEN 510 

520 PR I NT: PR I NT: PRINT 

525 PRINT CHR$(31) 

530 POKE 36869,240 

535 PRINT TAB (5) " PUNT0S : "S 

540 PR I NT : P R I NT : PRI NT 

550 PRINT TAB(5)"REC0RD:-R 

560 PRINT PRINT PRINT 

570 PRINT TAB(5) JL 0TRA ?" 

580 FOR 1=1 TO 300:GET X$:NEXT J 

600 GETXS 

610 IFXS= THEN 600 

620 IFXSo"N" THEN :P0KE 36869, 254 :GOT040 



630 PRINT CHRSf147); 
640 POKE 36879,27 
650 END 

700 POKE EX-21XN 
705 S-S + 10 
710 POKE EX ,6 
715 POKE EX+M,2 
720 FOR 1=1 TO 30 
725 X- INT(RND(TI}*4) 
730 Y=INT(RND(TI)*6) 
740 XY=7680+(22-Y)*22+B + X 
750 P0KEXY,6 
760 P0KEXY+M.2 
770 NEXT 

780 FOR 1 = 1 TO 200 NEXT 

800 NX= NX 1 1 : PRINT CHR$(1 47) ;:GOT0 100 
1000 PRINT CHR${1 47); 
1010 M -30720 

1 020 BS= CHR$(1 44) +CHRS(32)+ CHR$(64)+ CHR$(65)+CHR$(66) 

+CHRSC19) 
1030 A=19:S=0:BB = 0:B-0:D$-" M 
1060 FOR 1 = 1 TO 10 
1070 D$-D$+CHR$(17) 
1030 NEXT 

1035 D1$=DS+CHR${17) 

1090 A$=CHRS(156)+DS+CHRS(67)+CHRS(68)+CHRS(32) + 

CHR${19)+D1$+D$ 
1100 N2$-CHR$(32) + CHR$(32)+CHR$(32) 
1120 EX=0:CX=5:XC=2:NX=20:CN=32:RETURN 
2000 PRINT CHRS(147); 
2010 POKE 36669,254 
2020 POKE 52,24: POKE 56,24 
2040 FOR 1=0 TO 55 
2050 READ A 
2060 POKE 61 44+ 1 ,A 
2070 NEXT 
2080 FOR I-0T0 7 
2090 POKE 6400+1,0 
2100 NEXT 

2110 POKE 36879,30:RETURN 
3000 DATA 0,0,0,0,7,255,255,127 
3010 DATA 16,16,56,252,255,255,255,255 
3020 DATA 0,0,0,0,224,255,252,243 
3030 DATA 0,0,0,0,0,63,127,255 

3040 DATA 0,0,0,1 ,3,255,255,255 § 
3050 DATA 0,0,0,0, 1 25,255, 125,0 « 
3060 8,33,128,10,0,40,0,16 © 




Codigo del 6809 Lenguaje maquina 



Rupturas 



i todavia por definir dos subrutinas del 
Pumos De Ruptura, una para diminar 
de ruptura previamente insertados y otra 
restaurai el opcode original doncic hayamos 
oolocado un opcode SWI temporal, Dcbemos ana- 
jlz en primer lugar la rutina que llamaremos Des- 
insertar Puntos de Ruptura (de una labia do dichos 
puntos). 

Se ha posibilitado la colocacion de hasta 16 pun- 
kjs en Tab la- Punt os- Ruptura (BPTAB). Para elimi- 
ellos dcbemos obtencr su numero. que 
serviia de desplazamiento (dentro del intervalo del 
0 al 15) en la tabla. La entrada de la tabla se elimina 
desplazando todas las entradas subsiguientes un 
lugar hacia atras en la tabla (dos bytes) y decremen- 
lando Numero-Punto-Ruptura, 

Desinsertar-Puntos-De- 



Seguimos con nuestra tarea de diseno y escritura de un programa 
depurador de errores 



cremento para recorrer la tabla. La entrada de 16 
bits puede ser desplazada a traves de U, pero la de 8 
bits tendra que utilizar A de nuevo. 

EI ultimo proeeso empleado en este modulo eli- 
mina fisicamente un punto de ruptura sustituyendo 
el opcode SWI con el codigo original en la Tabla de 
Valores-Sustituidos. 

Eliminar-Punfo-Ruptura 

Data 

Numero-Punto-Ruptura es un desplazamiento de 8 
bits en la Tabla-Puntos-Ruptura 
Froceso: 

Tomar el valor que se halla en Valores-Sustituidos 
(Numero-Punto-Ruptura) 

Almacenarlo en la direction indicada en Tabla-Puntos- 
Ruptura (Mumero-Punto-Ruptura) 

Asumiremos que el parametro Numero-Punto- 
Ruptura es pasado en B de la forma habitual eomo 
numero entre 1 y 16, que ha de convertirse para 
que funcione como un des plaza mien to en las ta- 
blas, 

Estamos ya en la etapa de construir un modulo 
para ejecutar las ocho ordenes de una letra simple 
que operan el si sterna (vease p. 1238). Van as de 
estas ordenes pueden ejecutarse por medio de las 
rutin as que ya hemos escrito. No obstante, para ser 
completos y obtener una adecuada estruetura mo- 
dular incorporaremos Hamad as a dichas rutinas 
desde cste modulo. 

La orden B, insertar un punto de ruptura, se con- 
siguc plenamente con la rutina insereio n -Puntos- 
Ruptura (BP01), En este modulo, pues, solo neee- 
sitamos escribir: 

CUD6 BRA BP01 

La orden U, desmsertar un punto de ruptura, casi 
se ctBU p fc con la rutina que acabamos de escribir 
(BP04). Pero primero debemos tomar la direction 
del punto de ruptura que hay que descartar busean- 
do en la Tabla -Puntos- Ruptura para encontrarla. Si 
no se encuentra a Hi, se ignora la orden; si se en- 
cuentra, podemos pasar el desplazamiento a la sub- 
rutmaenBPQ2. 



Ruptura 



Data: 



Numero-Puntos-Ruptura es un valor de 8 bits 
Numero-Punto-Ruptura es un contador de 3 bits 
Tabla-Puntos-Ruptura es una tabla de direcciones de 
16 bits 

Entrada-a-Descartares un desplazamiento de 3 bits 

(con vaJo res entre 1 y 16) 

oceso: Desinsertar-Puntos-De-Ruptura 

: - : Numero-Puntos-Ruptura 
&*fada-a^escartar<=Num 

%m tiesfe) lfc»i-Ptoto-RuDtura= Entrada-a- 



Bxff 
Fin de proeeso 

El parametro Entrada-a-Descartar puede ser pasa- 
do en B. El contador Numero- Punto-Ruptura 
puede tambien colocarse en B, y adquirira automa- 
ticamente su correeto valor inicial. Despues de 
compararlo eon Numero-Puntos-Ruptura, debe de- 
: . lent arse para formar el desplazamiento en la 
labia de Valores-Sustituidos de ocho bits y poste- 
riorrnente se desplaza (se multipliea por dos) para 
formar un desplazamiento en ia Tabla-Puntos- 
Ruptura de 16 bits. Ef desplazamiento de 8 bits se 
puede guard ar en B y el de 16 bits en A. Las direc- 
ciones de las entradas en ambas tablas pueden estar 
en X e Y, de modo que podemos emplear un autoin- 



La orden U 



Aviso a visualizar 

Direccidn-Punto-Ruptura as la entrada 
Tabla-Puntos-Ruptura 
Numero-Punto-Ruptura 
Proeeso: 

Visualizar el aviso 

Tomar Direccion- Punto-Ruptura 

Poner a 16 el Numero-Punto-Ruptura 



Rupturas en 
el codigo 



MEMORIA PROGRAMA 




El depurador inserta puntos 
de ruptura en el codigo objeto 
bajo com probation 
guardando primero el codigo 
de esa direccion en la Tabla de 
Valores-Sustituidos e 
inc re men tan do el contador de 
Numero-Puntos-Ruptura, 
para escribir encima del 
contenido del byte del punto 
de ruptura por el opcode SWI. 
La Tabla de Valores- 
Sustituidos es un 
hacinamiento de valores que 
pueden tomarse de cualquier 
position. Cuando se quitaun 
punto de ruptura el Valor 
Sustituido correeto se vuelve 
a copier de la tabla en la 
memoriaquecontieneel 
programa, y el byte so bra rite 
se elimina moviendo hacia 
abajo tod os los bytes de la 
tabla que estan encima de &\, 
decrernentando, por ultimo, el 
contador de Mumero-de- 
Puntos- Ruptura 
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Lenguaje maquina/Codigo del 6809 




While (siempre que) Tabla-Puntos-Ruptura 
(Numero-Punto-Ruptura) <> Direccion-Punto- 
Ruptura 

y Numero-Punto-Ruptura > 0 
Decrementar Numero-Punto-Ruptura 
Si es encontrada entonces 
Deslnsertar-Punto-Ruptura 

La Direction-Punto-Ruptura se puede guardar en 
Y, dejando X disponible para su empleo como mdi- 
ce de la tabla. Numero-Punto-Ruptura puedc guar- 
darse en B. 

La orden D, visualizar los puntos de ruptura, se 
realiza con la rutina que etiquetamos DISPBP, Se 
accede a ella con una simple bifurcacion a subru- 
tina: 

CMDD BRA DISPBP 

La orden S ? iniciar la ejecucion del programa. cs> 
algo mas complicada, puesto que es aqui donde se 
insertan los puntos de ruptura. El opcode de la ins- 
truction SWI debe ser insertado en cada direction 
dentro de la TabI a-Puntos-Ru p tura , y el opcode 
que ya se encuentra alii se coloca en Valores- 
Sustituidos. Una vez hecho esto. el control se trans- 
ferira a la direccidn de initio del programa. Debe- 
rnos observar tambien que el siguiente punto de 
ruptura es el numero 1. He aqui el proceso comple- 
to para el initio del programa: 



Orden S 



Data: 

Numero-Puntos-Ruptura 35 un valor de 8 bits 

Tabla-Puntos-Ruptura 

Valores-Sustituidos 

Numero-Punto-Ruptura as un contador de 3 bits 
Siguiente-Punto-Ruptura es un valor de 8 bits 
Opcode SWI es un valor de 3 bits 
Inicio-Direccion as la direction de 16 bits inicial del 
programa que tratamos de depurar 
Proceso: 

Poner Numero-Punto-Ruptura a Numero-Puntos- 
Ruptura 

While (siempre que) Numero-Punto-Ruptura > 0 
Establecer-Punto-Ruptura (Numero-Punto- 
Ruptura) 

Decrementar Numero-Punto-Ruptura 

Endwhile 
Poner Siguiente-Punto-Ruptura a 1 
Saftar a Inicio-Direccion 

Para esto ultimo empleamos la rutina Estableccr- 
Punto-Ruptura, ya codificada, que requiere tcner 
en A el Numero-Punto-Ruptura (menos 1 r para que 
pueda servir como desplazamiento en las tablas). 



Decrementaremos, por conveniencia, a A antes de 
llamar a la rutina Establecer-Punto-Ruptura. Da- 
mos finalmente la rutina codificada. 

El modo de concluir esta rutina exige una peque- 
na aclaracidn, Cuando se esta ejecutando el progra- 
ma a depurar no se necesitan items adicionales en 
la pila, por lo que habremos de cerciorarnos de que 
la pila esta varia cuando se transfiere el control al 
programa. Podriamos borrar todo item superfluo 
de la pila en el nddulo principal, pero si es llamada 
esta rutina por medio de BSR (para mantener la 
consisteneia con las otras drdencs) la direccidn de 
rctorno debera colocarse en la pila. Y si la dejamos 
alii en una sesidn larga (en la que cl programa 
puede ser reiniciado repetidas veces) la pila puede 
crecer desmesuradamente. La solution empleada 
consiste en quitar la direccion de la pi 3 a en el mo* 
mento en que el control es devuelto al programa- Y 
esto so hace sustituyendo la direccion de retorno 
colocada en la pila por la direccion inicial. Enton- 
ces la RTS hace saltar la direccion de retorno, ya 
convertida en direccion inicial, fuera de la pila, 
transfiriendo el control al mismo tiempo que resta- 
blece la pila. 

En esta leccion examinarcmos finalmente la 
orden M, inspeccionar y cambiar posiciones de me- 
moria. Se trata de obtener como entrada una direc- 
cion y de visual izar el ccntenido de esa direccion en 
la pantalla. El usuario puede entonces introducir 
un numero hexa de dos dfgitos para colocarlos en 
esa posicidn. o sencillamente un Return. En cual- 
quier caso pasamos a la siguiente posicidn en la me- 
moria. El usuario puede detener el proceso entran- 
do un punto. La rutina GETHX2 se codified teniendo 
esto presents permitiendo la entrada de dos dfgitos 
hexa o bien de un punto o de un Return. 



La orden M 



Data: 

Position-Actual es la direccion de 16 bits de la 
posicidn que queremos inspeccionar 
Valor-Actual se encuentra en Posiclon-Actual y es de 
8 bits 

Valor-Nuevo para Position-Actual; tambien de 8 bits 
Proceso: 
Tomar Posicidn-Actual 
Repeat 
Visuafizar Valor-Actual 
Tomar Valor-Nuevo 
If Valor-Nuevo no es un punto then 
If Valor-Nuevo no es un Return 

Almacenar Valor-Nuevo en Posicidn-Actual 
Endif 

Incrementar Posicidn-Actual 
Visualizar Posicidn-Actual 
Endif 

Until (hasta que) Posicidn-Actual sea un punto 

Para esta rutina se almacenara la Posicidn-Actual 
en X, empleandose ei registro B tanto para Valor- 
Actual como para Valor-Nuevo. Por su parte, A 
sirve de flag que indica cual de las tres posibilidades 
(un hexa, un punto o un Return) se ha introducido. 

Nos qucdan por disenar y codificar las restantes 
tres drdenes, G, R y Q. Pero para ello se necesita 
emplear un mecanismo de interruption que habre- 
mos de analizar detenidamcntc. Dc cllo trataremos 
en la proxima leccion junto con el discno del modu- 
lo principal del programa depurador de errores. 



Rutina Desinsertar 



BP04 


PSHS 


A,B.X.Y.U 


Sate regs. empleados 




DEC 
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Ruptura 
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— 


B.A 


fnnia B mi A 
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Convierte A en un despl. 
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DOTAD nnn 

BPTAELPCR 


Direccibn base de Tab la-Pu ntos- 








Ruptura 




1 CAV 

LtAX 


A V 
A,A 


Tabla-Puntos -Ruptura (Numero- 
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ntJvi iad, run 


Direccion base de Valores- 






Sustituidos 




LEAY 


B,Y 


Valores-Sustituidos (Numero- 








Punto- Ruptura) 


FOROO 


LDU 


2.X 


Toma laentradade Tabta- 








Puntos-Rupturaa mover 




STU 


X — 


La mueve un lugar hacia atras 








Toma ta entrada de VaJores- 








Susttutiosqoe hay que mover 




STA 








INCB 








CMPB 


NUMBP.PCR 






BLT 


FOROO 




— . — n 

ENDF02 


PULS 


A,B f X.Y.U.PC 


Resiauraryretornar 


Rutins 

till II 1 J CI 


Eliminar-Punto-Ruptura 


BP05 


PSHS 








DECB 




Conversion en despl. para 








Vafores-Sustituidos 




LDX 


REMTAB f PCR 


Direccion base de valores- 








Sustituidos 




LDA 


B.X 


Toma el valor a mover 




LSLB 




Conversion en despl. para 








Tabla-Puntos-Ruptura 




LDX 


BPTAB.PCR 


Dir. base de Tabla-Puntos- 








Ruptura 
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[B.X] 


AJmac. en taWa segun dir. 
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D.Y 
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LDB 


MAXBP.PCR 


Numero maximo de Pitntos- 
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LDX 


BPTAB.PCR 


Dir. base de Tabla-Puntos-Rupt. 




TFR 


B,A 
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A es un desplazamiento al final 








de Tabla-Puntos-Ruptura 




LEAX 


A,X 


X seriala ahora mas alia del final 








de ia tab la 




TSTB 




Activa Jos Nags segun contenido 








de8 


WHIL02 


BLE 


ENDWQ2 


While B>0 




CMPY 


,-x 


(Recuerde que X se decrementa 








primero) 





BEQ 


ENDW02 
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y (and) Dir r -Puntos-Rupt. no se 






encuentra en la tabla 




nrrD 

DECB 




Decrementa Numero-Pufilo- 




BRA 


WHIL02 


Ruptora 


ENDW02 


TSTB 




Se encuentra si B>0 


IF03 


BLE 


ENDF 


Si se encuentra, entonces 




BSR 


BP04 


Desinsertar-Punto- Ruptura 


ENDF03 


PULS 


A D V V 




La orden S 






START 


RMB 


2 


Direccion- Initio 


CMOS 


LDA 


NUMBP.PCR 


Pone Numero-runto-rEupiura a 






N ii me ro-Puntos- Ruptura 


WHIL03 


TSTA 




Prueba el valor de Numero- 




Punto-Ruptura 




BLE 


ENDW03 


While Num. -Punto-Rupt.>0 




DECA 




Decrementa Num.-Punto-Rupt, 




BSR 




bstaoiecer-runio-nupTura 




BRA 


WHIL03 


Sigjiente-Punto-Ruptura 


ENDW03 


LDA 


# 1 


Pnnpra 1 Sinuiente-Punto- 




STA 


NEXTBP.PCR 


Ruptura 




STD 


1,S 






RTS 
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PROMPT 


FCB 


> 




SPACE 


FCB 


32 


Espacio, en codigo ASCII 


CMDM 


PSHS 


A.B.X 


Guarda regs. empleados 




LDA 


PROMPT.PCR 






BSR 


DUTCH- 


Visualiza el aviso 




BSR 


GETADD 


Toma Posicion-Actual 




TFR 


D.X 


La lleva a X 


REPT01 


LDB 


,x 


Toma Valor- Actu at 




BSR 


PUTHEX 


Lo visualiza 




LDA 


SPACE, PGR 






BSR 


DUTCH 


Visualiza un Espacio 




BSR 


GETVAL 


Toma Nuevo- Valor 


IF03 


TSTA 




Si Valor- Nuevo no es un punto 




BLT 


UNTL01 






BGT 


ENDF03 


Si no es un Return 




STB 


t x 


Almacena Valor-Nuevo en 






Position -Actual 


z\ZKl 


LEAX 


1.X 


Incrementa Posicion- Actual 




— = 


X.D 


Visual tea Postcitin -Actual 




55= 


:sfad: 






BRA 


REPT 




UNTL01 


PULS 


A,B f X,PC 
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La suma d e las partes 

He aqui un repaso de las materias que hemos estudiado hasta el 
momento en este apartado 




Los micros BBC y Commodore 64 poseen una dis- 
position de entrada/safida similar que permite la 
comunicacion con el mundo exterior a traves de 
una puerta para el usuario. que consiste esencial- 
mente en ocho patillas de datos y una conexion a 
tierra. Cada una de estas ocho patillas de datos esta 
asociada a una position particular de la memoria. 
denominada registro de datos. correspondiendo 
cada pati Ha a un bit en el registro. Una segunda 
posicion, el registro de direccion dc datos (RDD), 
control a la direccion de los datos que fluyen a O 
desde cada patiila. Si cualquiera de las patillas se 
establece cn salida (bit RDD=1), en la patiila se 
induce un voltaje de + 5 V cada vcz que cl bit co- 
rrespondiente se establece alto {en uno), Si el bit de 
datos se establece bajo, en la patiila se induce un 
voltaje de 0 V. Si bien la corriente que se summis- 
tra desde las patillas dc datos de la puerta para el 
usuario no puede activar directamente dispositivos 
cxtcrnos, si se la puede utilizar para disparar un 
sistema de rele que pcrmita encender o apagar vol- 
tajes mayores y/o sistemas que esten conectados a 
la red electrica. 
Cuando se establece una patiila para entrada (bit 



RDD-0), cntonccs cl metodo dc operation es bas- 
lantc diferente. En estc caso, cl bit corrcspondicnte 
del registro de datos sc manticne alto, bajando so- 
lamente si la patiila se conccta a tierra. Esto se 
puede cmplcar para controlar even to s del mundo 
exterior, conectando un lado de un sencillo inte- 
rruptor a una patiila de datos y el otro lado a la 
toma de tierra de la puerta para el usuario. Cuando 
se mueve el interrupter, la patiila de datos conccta 
a tierra y el bit correspondiente del registry dc 
datos sufre una transition de alto a bajo. 

Las ocho tineas de datos y la toma dc tierra se 
deben conectar de alguna forma a cada dispositive 
del sistema de la puerta para el usuario y, de este 
modo, todo el sistema complcto se designa alrede- 
dor dc un bus comun de nuevc line as, conectado 
cada dispositivo en la linea adecuada para su fun- 
cion particular. Este bus comun se conccta a cada 
dispositivo mediante un conector minicon de 12 
vjas, Conectando a un conector macho del lado ^in- 
terior" y un conector hem bra del lado "exterior*" en 
cada dispositivo, podemos realizar una 4 'cad en a 
margarita" de cualquier combination de compo- 
nentes del sistema entre si. 



La caja de salida 

La caja de salida de bajo voltaje se conecta con el bus 
del sistema a traves de un conector macho minicon 
de 12 vi as, que se enchufa en su equivalents hembra 
de la caja buffer. La corriente suministrada por una 
patiila de datos activada es del orden de unos pocos 
miliamperios, insuficiente para activar un dispositivo 
como, porejemplo T un motor electrico, pero 



suficiente para actuar a modo de corriente de 
conmutacion a traves de un transistor. Las lineas de 
datos de la 0 a la 3 las utiliza la caja de bajo voltaje. 
La activation (estado "alto") de una de estas lineas 
hace que el voltaje del transformador se conmute a 
traves de un transistor al correspondiente conector 
de red de esta caja. Por lo tanto, con el voltaje de 
entrada se puede abastecer simultaneamente a 
cuatro dispositivos. 
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Curso de repaso/Bricolaje 




PUEBTA 
PARA EL 
USUAmO 



B7 



7805 



R9 



RID 



R11 



IN4I48 



R12 



T 



R13 



R14 



<H 



T 



R16 



AMPLIACION 
DEL 
SISTEMA 



ENTRADAS 



Lacaja 
buffer 



Es el dispositive mas 
importante del- sistema de la 
puerta para elusuario. El 
sistema de circuitos protege 
los chips de E/S del ordenador 
contra cualquier intento de 
"sorber" demasiadaecrriente 
de una patiila de datos o por 
aplicar un voltaje de entrada 
pe I ig .re s o . Ade mas , acepta y 
reguia una entrada de CD a CA 
desde un transform ado r, en la 
escalade 5a 21 V. Esta 
entrada de voltaje se agregaal 
bus del sistema como un par 
de lineas extras, para utitizar 
con otros componentes del 
sistema. Con la caja buffer 
conectada se pueden efectuar 
entradasen la puerta para el 
usuario; los ocho conectores 
rojos corresponden a las ocho 
lineasde datos, los 
conectores negros 
proporcionan una toma a 
tierra separada para cada Imea 
de datos. Hay montada en la 
caja una serie de echo LED. 
Cada LED se ilumina si su Imea 
de datos se desactiva 




El rele de red 



Se puede hacer que el voltaje del transforrnador 
con mute un voltaje de la red mediante un rele. Esta 
unidad se enchufa a la red y a una de las cuatro 
Imeas de la caja de salida, Al establecer alto una de 
ids bits del registro de datos, se conmuta la 
alimentacidn del transforrnador al corrector de 
salida correspondiente, que a su vez conmuta la 
alimentacidn de la red al conector de tres vias. Asi 
es posible controlar aparatos electricos desde el 
ordenador. {Veasep. 1126.} 





Todo lo que itnplica potencia 
electrica exige sumo 
cuidado, 

• Antes de comenzara 
trabajar desconecte las 
fuentes de potencia. 

• Compruebe conexrones y 
aislamientos mediante un 
tester. 

• Ivite los cortocircuitos. 
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Visualization 
en siete 
segmentos 



i;\ r- _::.s 
scenes. Esla 

contenido del 
I ugaatt iBflaoscte la puerta 

it : - = . ■ , se puede 
::-f"- . mi a caja buffer 
I 1 3er s an conector minicon 
- : : : : ■ zza de salida 
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R4 



R5 — 
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R8 _ 



R10 
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R12 



R13 — 



R14 - 



a VCC 
b 

c 

d 7447 

e 

f 

9 VSS 



AO 



A3 



R1-R14330 il 



El convertidor D/A 

El convertidor de digital a analogico convierte un 
valor del registro de datos entre 0 y 255 en un 
voltaje. La salida de la caja es de alrededor de 
600 W, no lo suficientemente fuerte como para 
activardirectamente motores u olros dispositivos 
de gran consume pero se la puede amplificar para 
hacerlo, Por otra parte, el convertidor se puede 
utilizar para generarsonido. ya sea a traves de 
auriculares o bien de un amplificadorde audio 




+12 V 
+5 V 
DO 
D1- 
D2 
03 
D4 
D5 
Dfi 
W 

TIERRA ' 



VCC 


DO 




D1 




D2 




D3 


2N425 


D4 


D5 




D6 




D7 




VSS 




I 



47 ^ F DC 0/P 



10K 



AC 0/P 




Replica perfecta 

La mejor forma de "trabajar" con un robot en casa es mediante la 
creacion de un modelo del mismo por ordenador 




lactones: se puedea construir ""modetos" por oide- 
nador que imiten fidedignamente aconteonneiiias 
del mundo reaL La mayoria de las personas ya 
estan familiarizadas con el concepto de simuiadores 
de vuelo, dispositivos sumamente complejos que 
permiten a ios aspirantes a piloto adquirir experien- 
da de vuelo sin tener que pilotar un avion autenti- 
co. Pero hay muchas otras aetividades que tambien 
se prestan a la simulation por ordenador: previsio- 
nes comerciales, operaciones de ingeniena y proce- 
sos fisicos de todo tipo se pueden simular muy facil- 
mente en un modelo por ordenador. En algunos 
casos, 6ste puede llevar a cabo experimentos que, 
ze realizarse por algun otro medio, serian demasia- 
do peligrosos, Por ejemplo, es de vital importantia 
descubrir lo que sucederia en una central de ener- 
gia nuclear si se produjera una fuga de liquido refri- 



sage da ieacsor. En esse caso. oovmmeme sena 
■anosftfe t mAat central nuclear autentica 
para levar a cabo el cipeiime nto. de modo que se 
una simulaoon per ordenador. Si el mode- 
lo es suficientemente detaUado. entonces se puede 
ver con exactitud lo que sucederia si se produjera la 
fuga. 

Del mismo modo, en el campo de la robot ica se 
utilizan simu laciones por ordenador para disenar 
nuevos robots. Es evidente que se puede proceder 
mediante ensayo y error (constmir un robot, obser- 
var co mo se comporta y luego efectuar todas las 
modificaciones necesarias), pero esto es costoso y 
lleva mucho tiempo* Una simulation por ordena- 
dor permite disenar un robot y controlar sus actio- 
nes sin costo alguno y sin el esfuerzo ffsico que im- 
plica realizar frecuentes cambios de diseno. 

Tomemos como ejemplo una cadena de montaje 
de automoviles, en la cua) un equipo de robots va 



Movimientos arm 6 m COS 

Cuafldo Ios robots reatizan una 



coreog rar ia, eon el objato de 
que no interfieran entre si. Aquf, 
un brazo puede recoger y 
maniener el juguete en posicion 
mientras el otro robot recoge un 
tambor y lo coloca en su sitio; el 
primer brazo coloca entonces el 
juguete ya complete en su caja. 
Si el movimiento del brazo se 
controls adecuadamente, las 
cintas trans portadoras se 
pueden ubicar en cualquier 
disposition que resulte mejor 
para el resto de la cadena da 
montaje, mientras que las 
exigeneias crgondmicas de un 
operador humano limitanan esta 
libertad 
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trabajando en los caches a medida que van pasan- 
do, Todo lo que se desea es programar los robots 
de modo que ensamblen los vcfneulos de la forma 
corrccta. No obstante, programar los robots ocupa 
tiempo y, cada vez que se paraliza la cadena de 
montaje, sc pierde dinero. Podria optarse por crear 
una linea de montaje falsa eon algunos robots total- 
mente difcrentes con los cualcs desarrollar los nue- 
vos programas* Pero esto tambien es caro y puede 
conducir facilmente a otra dificultad: el problema 
de la coreografia de los robots, de la cual ya hemos 
hablado anteriormente. Es de vital importancia 
asegurar que los robots que esten trabajando juntos 
no interfieran mutuamcnte en sus movimientos. 



_ - ~:=: :e movimiento Esto no es solo una cuestion de convenience un 
I csansEcaobn que requieren gran robot industrial capaz de Transportar cartas 




mente que se pasara el tiempo so Id an do puertas de 
coches para cerrarlas enseguida seria desastroso! 

La respuesta obvia no es otra que llevar a cabo 
simulaciones por ordenador de las acciones de cada 
robot, de modo que el usuario pueda ver cdmo in- 
teractuan las mismas. De esta forma los costos son 
bajos y no hay nada que pueda resultar danado. 
Una vez que la si mulacion se hay a completado y 
cuando todo parezca ser satisfactorio, se pueden 
transferor facilmente los programas asi desarrolla- 
dos a robots reales, que entonces ya pueden llevar 
a cabo con total seguridad las tareas asignadas. 

En este capitulo demostraremos el principio de 
la si mulacion por ordenador me di ante un progra- 
ma, Brazo-robot, que Simula un brazo-robot de 
"coger y colocar" con dos grados de libertad. No 
posee sensores, de modo que usted mismo debe 
guiarlo, controlando las junturas del hombro y del 
codo y el mecanismo de prension del efector finah 
con el fin de asir un objeto y colocarlo luego en 
algun otro lugar. Adicionalmente, remftase at pro- 
grama para resolver laberinros que ofrecimos en la 
p agin a 1202 , que muestra cdmo se puede progra- 
max un robot para que encuentre su camino hasta 
el centre de un laberinto. Este programa es, en rea- 
lidad, una simulacion por ordenador de cdmo in- 



tentaria alcanzar su objetivo un robot real. Imita 
las acciones de un automata cibernetico dotado de 
un sencillo sensor tactil y encuentra la ruta correcta 
siniplemente avanzando hacia espacios vacios hasta 
hallar un callejon sin salida, punto en el cual retor- 
na a la ultima intersection que habia atravesado y 
trata entonces de seguir avanzando por un nuevo 
sendero. Este modelo no tiene practicamente nin- 
guna sofistieacion, pero ilustra como se puede utili- 
zer un programa de ordenador para simular los mo- 
vimientos de un robot. El robot del programa obe- 
dece un con junto estipulado de regias y «traza un 
mapa» del entorno. Si, dentro del programa, tuvie- 
ra acceso di recto c in mediate a las posiciones dc 
todos los componentes del laberinto, seria capaz de 
avanzar direetamente hasta su meta. En nuestro 
programa el robot carece de esta information y, 
por tan to. debe valerse de una tecnica de ensayo y 
error. 

De forma similar, el programa Brazo-robot imita 
el comportamiento de un robot que no posee nin- 
gun sensor. Este programa contiene un modelo del 
entorno del robot y otro del brazo propia mente 
dicho, y es necesario asegurarse de que ambos mo- 
delos interactuan solo como lo harian en la vida 
real. Por consign iente, no se puede rccoger un 
objeto con el brazo a menos que el mismo este po- 
sitionado correct a mente. Y tampoco es posible 
despfazar el brazo por debajo del nivcl del suelo, 
dado que ello seria imposible si el brazo-robot 
fuera autentico. A pesar de que estamos utilizando 
graficos por ordenador, en los cuales una line a (que 
representa el brazo) podria facilmente cruzarse con 
otra (el suelo), para una simulacion exacta es preci- 
se que est as li'neas no se crucem Y cuando el robot 
suelta un objeto, este no debe permanecer necesa- 
riamente en esa position: su simulacion debe per- 
mitir efectos gravitac ion ales. Si este punto se igno- 
rara, ;ciertamente no se podria desarrollar una si- 
mulacion segura para que un robot dc "coger y co- 
locar" manipulara huevos! 

Para obtener mayor 
realismo 

Existen muy pocas limitaciones en cuanto a lo que 
se puede conseguir utilizando fa simulacion por or- 
denador; y, en la mayorta de los casos, cuanto mas 
complcja es la simulacion, mas fascinante resulta. 
Tal simulation puede seT aun mas entretenida que 
el simple hecho de jugar con robots reales, pOT la 
sencilla razon de que, empleando una simulacion, 
uno puede disenar el robot que desee; la programa- 
cion de los detalles cor rectos de este y su mundo 
puede conducir a una mejor comprension de los ro- 
bots y de la forma que funciona el mundo fisico, 
Observe otra vez el programa Brazo-robot, Vera 
que cuando el robot deja un objeto, este cae al 
suelo y permanece alii, Para lograr que el modelo 
sea aun mas realist a, se puede modificar el progra- 
ma de modo que el objeto vaya acelerando a medi- 
da que cae, obedeciendo, por lo tan to, la ley de 
gravedad. Y, tal vez, <• podria incluso rebotar al 
caer al suelo? 

Las posibilidades son muchas y el programa esta 
alM, para que usted lo adapte, an ad i en dole caracte- 
risticas nuevas y mas realistas para que su simula- 
cion sea lo mas "viva" posible. 
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SPECTRUM " 
5 «l - SJMULACION 5RAZ0 ROBOT ■ 
S SOI "SPECTRUM 

•: ;T; ■-- ~ =vz:=:=:- ' 11 " ^ 

B.SMZD HOBOT SOfc* 

' ' E- 
i„\TJRA 




i --_5E 0: 




-:- _T ?.= "CGSndl 

L£Twy=l2XQShd2 
wctEThy=hy-i-wy 



- :: 

. . E : EE .sx.sv 
■TIIVERSE iubout;ex,ey: DRAW INVERSE rubouLwx.wy 
: .: _ -E\ _ET ar FN r(hy) LET be- FN c(hx): 
BOB 266 

::.fi-:c3 * 

i (nibOut+1) 



_- : _ET ,::/=" SCSU3 2000: LET wbout 0 

.Z~t=lfrc«?'RNOj: IF k>=xs THEN IF k<=xs+wd THEN GO TO 

"V 

» iBT^=FWrtyO-r4): LET bc=FNc(k): LETblup=0: GO SUB 2000: 

ri eeze:: 



JK Ml* roter 

3H _£j^oet=1:GO SUB 2000 

_E^tI =*n *sr* a1 : LET 12 =t1 + dim * er * a2 
~ : =-Gt-t1:LEThd2-hdZ+t2 
9B &BSHB15Q0 
_ ; r -EE ■ --:2 THEN LET ok- 0 
rrt _rz* = -: \7.nx,hy) 

" : '.^T dk-0: iF br-FN r(hy) AMD bc=FN c(hx) THEN 

.r \;art=€ 2: SUB 2000 

== V AT 21.0:sS:AT21,2:FN d(hd1):AT2l,26; 

=* : -a 



"THEN GO TO 5100 

: 

am _Er*=MgVS:lF3S>=-A- ANDaS<=T* THEN LET 
*-O3W|C0PE a&-r32) 

99 f *=*5*TiGl4xT3i=" LE Sf=0 
23 F*=-t-~-e .r : - E E 

--E _r : - - :::: 
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Cogery colocar 

Este programa Simula un brazo-robot que puede 
estirarse hasta alcanzar un objeto, asiiio y 
colocarlo luego en otro lugar. Su tarea consiste 
simplemente en recoger la bola y luego dejarfa 
caer. El brazo esta disenado para utilizar 
eoordenadas de revolution con dos grades de 
libertad: una juntura de hombro y una juntura de 
code. La primera puede rotar a traves de 180°; la 
segunda a traves de 360°, 
El programa se controla mediante las siguientes 
teclas: S indica que se desea un movimiento de 
hombro; E un movimiento de codo; las teclas K y H 
haran que la juntura del brazo rote en el sentido de 
las agujas del reloj o en el sentido contrario, 
respectivamente, Cada pulsation hace rotar la 
juntura del hombro en 6° ( y en 1 2° la juntura del 
codo, U indica que se desea que el brazo intente 
asir la bola. Esto solo se reallzara con exito si se ha 
logrado manipular el brazo dentro del alcance de la 
misma. Fharaque el robot ladeje caer 




Para e! BBC Micro realice las siguientes anadiduras 
y modificaciones: 

4 REM **BBC ** 

5 REM' SIMULACIOM BRAZO ROBOT 

6 REM ****** **-***BBC ***************** 

7 MODE1:COLOUR130:COLOUR1:GLS 

25 PRINTTABt 15.20)" PULSE UNA TEC LA": AS -GETS 
1000 GOSUB9600 
2020 GCOLO.acol 
2050 MOVE sx.sy 

2100 PLOT rubout ex ey:PLOT rubout,wx.wy:lF blup THEN 

br=hy;bc-bx:GOSUB2500 
2190 RETURN 

2200 REM COGER LA BOLA ********** 

2250 blup=1:rubout=3:GOSUB2500 

2300 rubout=1:G0SUB20Q0 

2500 BCOLO,bco!:MOVE be, br 

2BSR PLOT BLOJttPLOT 80- ru bout. bsz.O 

Zm IWajL -iSEft flT80^nibOtit.-bsz,Q 

20 i ^fr*H»uirfc i Tinm then goto 

is if " i i mm tr\\n\ i"w ivi iii ^in 



Mover y recoger 

Nuestro programa desimulacion 
de un brazo-robot permite 
mover un brazo de dos junturas 
en dos dimensiones y recoger 
un objeto con e! mismo. Cuando 
sedeja caer el objeto, el 
programa lo coloca al azar sobre 
el suelo. La visualization 
muestra los angulos verticales 
formadosporlosbrazos 
superior e inferior 



Jd-ftLET yi=0;LET xfi= 

wd=60:LET ht=23 

' bc-ELET br=FN rfyO+4) 

r bacol=2:LET aco(=1:LET bcol=6: 

fsy=yO-5-ftt+2:LETI1-(yli bt yO-2)/2:IF 

ETM=xh.4 

s = 0:LETfiy-0 

ra1=Pl/32:LETa2-*2*al 

nd2 = p2 

r=0:LET dirn=1:LET rubout- 
0 SUB 1500:GO SUB 2000 



- - ve s : - ~<\ rr: e m 

e e: es- e : : =^>= - -M^<= z _ -E?.as= 

■{= V ^t3 o*=2 THEN GOSUB 2200 

6100 PRINnAB(12,3)" !!CRASH!! n :SOUND 1 -15,48.10 SOUND 

1.-15,4,20:RETURN 
9050 GCOLO, pacol :COLOU R pacol :CLS 
9100 GCOLO, grcol 

91 20 FOR k-0 TO yO:MOVE 0,k:DRAW xh,k:NEXT k 
92 00 GCOLO. bacol :xs - fxh - wd)/2 
9240 MOVExs.k:DRAWxs+wd,h 
9300 MOVE bcbnGOSUB 2500:COLOUR acol 
9400 PRINTTAB^2,2) i, H0MBR0";TAB(26,2)'X0D0 ,, 
9600 s$=" ":x1 =0:y1 =0 xh - 1000 yh= 1 000 
9620 yO-100:wd=2QO:Ht=100 
9630 bl u p = 0: bsz - wd/5: be = 40 br= yO + 5 
9640 grcQU3:bacol=2:acol=2:bcol=Q:pacol^129 
9650 sx=xn/2:sy=yO+hH2:H -(yh-ht-yO-2)/2:IF 11 >xh/4 THEN 
I1-XIV4 

9690 sr=1:er=0:dim=1 :rtibout^1 :ok=1 
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Soluc ion ava nzada 

"TK'Solver" aporta una nueva dimension a la hoja electronica: 
el proceso de ecuaciones 



Como ya hemos visto en este apartado, los progra- 
mas de hoja electronica para in icroorden adores 
pucden ser muy utiles para una gran variedad de 
lareas matcmaticas. Para la persona acostumbrada 
a trabajar con grandes hojas compuestas de filas y 
coIumnaSs con un lapiz y una ealculadora, la hoja 
electronica representa un valioso elemento que 
ayuda a ahorrar tiempo y esfuerzo. No obstante, 
las hojas elect ronicas pose en iimitaciones sigmfica- 
livas. El formate tie fila y columna, ideal para con- 
tabilidad u otros modelos financieros, a incnudo es 
incomodo y, en oca si ones, inutil para aplicaciones 
eientfficas y mateiriaticas de nivel mas elevado, Y 
las hojas elect ronicas tienen una estructura muy ri- 
gida para nianipular ecuaciones. 

Software Arts, la empresa norteamericana que 
creo el VisiCak, ha desarrollado un programa Ha- 
ni ado TK!Solvei\ que va mas alia de las hojas elec- 
tronicas tanto en su forma como en sus funciones. 
"TK!" a hide a Tool Kit (juego de herramientas). 
mientras que i% Solver" (el que soluciona) es la see- 
cion de codigo que procesa ecuaciones. Ademas de 
ser dife rente a las hojas electronica* desde el punto 
de vista del formato de la pantalla. TK! ofrece las 
siguientes caracteristicas exclusivas: 



Modelo de interaccion 



Este diagrama refleja la 
estructura de las hojas de 
trab2jo disponibles en 
W Solver y la relation que 
guardan entre si. Las 
subhojas contienen datos a 
los que se Kama desde Ea hoja 
contra I ado ra 




SUBHOJA LIST 



Backsolving: LaS formulas de hoja electronica solo 
pueden resolver una unica variable. TK! puede re- 
solver cualquier variable de una ecuacion si se le 
proporcionan datos sufirientes para hacerlo; 
Iteration: Si falta o no se conoce algun valor nece- 
sario para resolver una ecuacion, se puede entrar 
un valor de ensayo y TK! lo utilizara como punto 
de partida. Luego resolvent la ecuacion a traves de 
una serie de aproximaciones sucesivas; 
Conversion de unidades: Puede convertir valores de 
pics a mctros, de dolares a libras, etc., instantanea- 
mente a partir de tablas de conversion; 
Funciones matemdtkas: Tiene incorporadas una 
enorme variedad de el las. 



Hojas de trabajo 



TKISolver opera a traves de tres hojas de trabajo 
enlazadas. cada una de ellas con una funcion espc- 
dfica. La hoja Variable contiene los nombres de 
todas [as % ariables definidas, columnas para los va- 
lores que entra el usuario y los valores que produce 
el programa, un lugar para indicar unidades que 
guardan alguna rclacion, y un espacio para que el 
usuario anote un comentario para cada variable. La 
hoja Variable aparece en la parte superior de la 
pantalla que visualiza inicialmente el programa. 
Cada variable tambien se escribe en detalle en una 
subhoja de variables separada, La hoja Rule se uti- 
liza para entrar las ecuaciones que TK! ha de resol- 
ver. Una ecuacion puede tener hasta 200 caractercs 
de longitud. y debe respond er a las convenciones 
matematicas estandares en cuanto a notation y 
operacioncs. La hoja Rule ocupa la porcion infe- 
rior de la pantalla inicial del programa. La hoja 
Unit almacena la informacion necesaria para con- 
vertir las unidades de medida que acomparian a las 
variables de un modelo. 

TK! emplea est as tres hojas para llevar a cabo la 
mayori a de sus operacioncs. Entre las otras se in- 
cluyen la hoja Global, en la que el usuario puede 
construir algunos de los procedimientos operativos 
del programa: la hoja List, que almacena una ma- 
triz de valores para variables; la hoja User Func- 
tion, para funciones definidas por el usuario; y 
hojas para trazar o imprimir puntos o tablas de 
valores, 

Creacidn de un modelo 

Lmpezaremos por crear un modelo muy simple 
adapt ado del manual de usuario del TK!, que cal- 
cula los gastos del recorrido y la velocidad media 
para un viaje eti automovil, y convierte los valores 
de unidades inglesas a unidades metricas. En la vi- 
sual izaci on inicial encontramos el cursor en la hoja 
Rule, en la parte inferior de la pantalla. Comenza- 



\2$A 



■ipordefinir las variables en ecuaciones apropia- 
IS- fie modo que tecleamos: 
#sfanmtenpo=vetoddad 

el programa esta 
i de variables de ecua- 
ible de la parte 
3n y visualiza las va- 
: de la hoja Variable por 
■ que apareeen en la ecuacion, 
Masterisco en la columna Status 
: la ecuacion. El asterisco signifi- 
. ■ ; ie variables no se ha entrado 
or- Loego entramos la segunda ecuacion 
i procedimiento: 

l gasoli na = g asto s vi afe 




delo no lie van asociada ninguna unidad. No podc- 
mos digitar millas ni gaiones en la columna de unida- 
des de la hoja Variable, porque no se puede utilizar 
unidad es hasta no haberlas definido. Desplazamos 
el cursor a la hoja Rule pulsando la tecla del punto 
y coma (;) y digitando luego = 11. TK! reemplaza la 
hoja Rule de la ventana inferior por la hoja Unit. 
Esta posee cuatro column as: 

From To Multiply by Add offset 
(de) (a) (multiplicar por) (anadir resto) 

El cursor se visualiza debajo de la palabra From. Ya 




" lv.u ecuacion, las cineo \arinblcs 

; se lis tar an en la columna Name de la hoja 

la tecla del punto y coma ( ;) para mover el 
desde la hoja Rule hasta la hoja Variable, en 
Ta podemos entrar valores. El cursor apare- 
cie entradas junto a nuestra pri me - 
Sr r".::-- sUuientes valo- 
d «f«" apropiado. pulsando 
ddcKor que senala hacia 





podemos entrar las unidades que deseamos que 
TK! conozca y los valores de conversion. 

Despues pulse =R para recuperar la hoja Rule; 
seguido de ; para pasar a la hoja Variable. Ahora 
ya es posible entrar los nombres definidos en la co- 
lumna Unit: m para distancia; h para tiempo; m/h 
para velocidad; g para gasolina y m/g para gastos- 
viaje. Vatic todos los valores en curso y sustituya- 
los por estos: 1,247 para distancia; 22.5 para tiempo 




U^drs de ldO«M t ggte l iy se dejan en 
ipaaqne los resueha TK' Sus valores calcu- 
Tisualizaran en la columna OUTPUT. Para 
- vetocidad y gastosviaje. pulse el signo de ex- 
(!>. Se' visualizara la frase Direct Solver 
directa) en la parte superior de la hoja 
porque al programa se le han proporcio- 
iDdos los datos necesarios para hallar una so- 
Enseguida se visualizaran como sali- 
latorespara velocidad y gastosviaje. Podemos 
Bar los valores entrados previamente y obte- 
H2 dfra para distancia dandole a TK! nuevos 
ess para velocidad y tiempo, o para gastos del 
5 sasotina, 

- valorem entrados en nuestro mo- 




y 43.9 para gastosviaje. Pulse ! para resolver y se 
visualizaran los valores metricos. 

Ahora coloque el cursor sobre m, en la columna 
de unidades, y digite km de kilometros. Pulse Re- 
turn, y TK! convertira automat ieamente el valor de 
1,247 para distancia de millas a kilometros, de modo 
que el valor para distancia se cambia por 2006.423. 

En este simple modelo nemos utilizado solo algu- 
nas de las facilidades que ofrece TK! 



Hardware/Spectrum+ 



En la Imea del QL 

Como respuesta a la aparicion de maquinas mas avanzadas, 
Sinclair ha vestido al Spectrum con nuevos ropajes 



Seis en uno 

Haciendose eco de la moda 
actual de "empaquetar" 
software con Ids micros 
personales, Sinclair incluye con 
el Spectrum + (yccn eJ 
Spectrum de 46 K) un 
impresionante paquete de 
software compuesto por seis 
pro gramas. Comprende un 
procesador de textos, una hoja 
elect ronica, dos juegos y dos 
paquetes para grafi cos 



En la epoca dc su lanzamiento, en la primavera de 
1982, el Sinclair Spectrum ofrecia una notable rela- 
tion calidad/prestaciones . Sus unicos competidores 
autenticos fueron el Vic-20, con unos escasos 3,5 K 
de memoria para el usuario, y el Texas TI99 4A. 
que se vcndian ai doble de su precio. De este modo 
el Spectrum se convirtio en un exito instant aneo 
entre quienes adquirian un ordenador personal por 
prim era vez, ademas de convertirse en la election 
natural de los millares dc entusiastas de los micros 
que desearon mcjorar sus ZX80 y ZX81. La nueva 
maquina tenia una memoria asombrosa de 48 K, 
utilizaba un buen basic y ofretia echo colores para 
graficos, asi como una primitiva facilidad de soni- 
do* El teclado, asimismo, representaba una gran 
mejora respect o a la lamina plastica plana "sensible 
al tacto" del ZX81. A la venta inicialmente solo por 
cor respondentia, el Spectrum fue un exito inmedia- 
to y enseguida se convirtio en el micro mas ven- 
dido. 

En el tiempo transcurrido desde su lanzamiento, 
los competidores de Sinclair han producido una 
gam a de maquinas para desafiar el dominio del 
mercado ejercido por el Spectrum. A pesar de 
tener un basic claramente inferior, el Commodore 
64 fue el competidor que mas exito obtuvo; ofrecia 
mas memoria (si bien nccesitaba programas en len- 
guaje maquina para aprovecharla al maximo), un 
sonido excelente y un "verdadero" teclado, con te- 
clas moviles tipo maquina de escribir. Asimismo, el 
BBC Micro ofretia mejores especificaciones. pero 
su precio impidio que se convirtiera en una seria 
amenaza, y sus fabricantes optaron por no redutir 
su precio. Sin embargo, sucesivos recortes en los 




precios del Commodore redujeron sustantialmente 
el costo del 64. La reaction de Sinclair fue rebajar 
el precio del Spectrum- 

Para entonces. el teclado del Spectrum {que en 
su tiempo fuera motivo de atraccion) era ya un ver- 
dadero inconveniente, La base de software de la 
maquina no habia sido superada y se produjeron 
muchos paquetes "serios" para el la. No obstante, 
tratar de utilizar programas para tratamiento de 
textos con el teclado del Spectrum era como escri- 
bir a maquina con un par de mitones puestos, Mu- 
chos usuarios, por consiguiente, invirtieron en te- 
clados "adecuados" y esta tendencia se acentuo al 
aparecer la unidad Interface 1/Microdrive, tanto 
tiempo esperada. Enseguida se hizo evidente que 
los usuarios de micros de 1984 ya no estaban prepa- 
rados para aceptar la idea de Sinclair de lo que 
constitma un dispositivo de entrada aceptable. 



Cirugfa plastica 



La respuesta de Sinclair Research ha sido practicar- 
le al Spectrum una cirugfa plastica facial. El 
Spectrum + es esencialmente la misma maquina, 
pero alojada en un teclado tipo QL, si bien reduti- 
do, con unas pocas tec I as extras, un interruptor de 
Reset y un par de pat as retract iles. Todos los peri- 
fericos producidos para la versi6n mas antigua tra- 
bajaran con el "Plus" (mas), pero Sinclair no ha 
sabido aprovechar la oportunidad para colocar el 
rendimiento del Sinclair mas en la Imea de las ma- 
quinas rivales, mejorando el sonido o proporcio- 
nando un conector para monitor o una Interface 1 
incorporada. Ah or a las facilidades de sonido de la 
maquina constituyen su punto mas debit. Las dos 
pat as permiten que se escape un poco mas de vo lu- 
men de la base de la maquina, pero esto es mas una 
incomodidad que una ventaja, puesto que significa 
que tarn bien se magnifican los ruidos propios dc 
cargar (LOAD) y guardar (SAVE). El patetico BEEP 
del Spectrum sigue siendo tristemente inadecuado, 
El Spectrum + mide 319 X149 x38 mm. El 
nuevo diseno hace mas sencilla la prog ram aci on al 
proportion ar t eel as extras para las mod alidades 
"Extended" y de graficos, video normal e inverti- 
do, teclas Delete y Break y teclas separadas para 
los sign os de punt nation que se utilizan coin un men - 
te, como el punto y coma, las comillas. la coma y el 
punto, Tarn bien se ha agregado una tecla Symbol 
Shift extra, y las teclas del cursor est an ahora eolo- 
cadas en lugares nuevos, a lo largo de una pequcna 
barra espaciadora. Todas las combinaciones de te- 
clas antiguas siguen funcionando. A los antiguos 
usuarios del Spectrum el nuevo diseno podria cau- 
sa rles algunos problemas. En especial, la nueva 
tecla Edit esta situada junto a la tecla "A"; si esta 
se pulsa por error cuando se esta entrando una 
linea de program a, la line a se pierde. 
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La placa 
tie circuitos 

En el interior de la atractiva 
carcasa tipo QL del 
Spectrum + encontrarnos la 
placa de circuitos Issue 4.5, 
Esta ea esencialmente la 
misma que la placa Issue 3 di 
Spectrum de 48 K que saliri al 
mercado en agosto de 1983 
con la adtcion de los 
desafortunados cables 
volantes del boton de reset 
parcheandc la placa 




DIMENSIONED 



MEMORIA E INTER 




de 48 K, BASIC 

:e compatibilidad 
■are 

58 teclas esculpidas 
(incluyendo una barra 
espaciadora); teclado tipo 
membra 

1 




Manual itustrado en color 
con cassette de gufa para 




■ottware 
existente para el Spectrum 
los grupos de usuarios y 
ias publicaciones 
especializadas constituyen 
envidiables atractivos 



A pesar de las teclas 
nuevas y de las patas, el 
"tacto" y la accion del 
teclado continuan siendo 
un punto debil 



parte del reempaquetamiento, los com- 
idd Sinclair reciben un lote compuesto por 
z~ Psion ; : :e:<. Make-a-chip, Scrab- 

~>':^: D \ el excelente software 
a uatauaento de textos Tasword two, Todos 
as programas responden a un estandar muy ele- 
b_ Lamectablernente. no se puede decir lo 
mo de la nueva document acion del Spectrum, la 
L a pesar de estar cuidadosamente presentada, 
de la profundidad del antiguo manual del 
Los edfeores soperen. no obstante, que 
: los Bsaarios adquieran mayor expe- 
i hacerks lie ear ma- 




de Ken^^ir^i tambieii 
i a la perfection, al igual que el sistema Wa- 
i de almacenamiento masivo. 
El Spectrum + representa, por cierto, una mejo- 
■_ : : ;m originaL perolaidea quetiene 

*jjfl i • sobre lo que es un teclado razonable no va 
:on una aprobacion universal, Si bien por 
it S:nc:air se puede considerar una jugada 
ie la utilization de la tecnologia del QL en 
> por hacer que el Spectrum resulte mas 
a los compradores, hay que comparar el 
> en el preeio del nuevo teclado con los ac- 
ya disponibles. Bajo este prisma, no se 
i consider ar que la relaci6n calidad/precio sea 
, :.:r.i, Ciertamente, la nueva maquina tienc 
i sspecto mas elegante, pero las teclas, a pesar de 




que estan "esculpidas" para facilitar el tecleado, ca~ 
recen de capacidad de respuesta y estan demasiado 
apinadas. 

Para quien adquiera su primer ordenador, el 
Spectrum 4- representa una opci6n que merece ser 
considerada, pero las facilidadcs que ofrece no 
compensan el aumento en su preeio. Algunos usua- 
rios podrian aventurar que Sinclair ha introducido 
el Spectrum + simplemente como una forma de au- 
mentar los precios; no seria sorprendente que el 
modelo original se retirara pronto de la venta, De 
hecho, la introduction de este modeio es un gesto 
extranamente desinteresado por parte de Sinclair; 
seguramente habria sido mas 16gico rebajar el pre- 
eio de la version antigua (y del paquete Interface 
I y dejarlo asr Por otra parte , Sinclair 
pockia baber aumentado hgeramente el preeio e in- 
ckado sodas las oosas que el Spectrum necesita ver- 
Mowmt, corao unas adecuadas facilidades de 
• - : _ - : - : . _ _ ; de teclas moviles. conector para 
monitor e, induso, un microdrive incorporado. 
Pero, de haber sido asL jamas hubiera estado listo a 
tiempo para las Navidades de 1984. 




El teclado 

Pensar que el teclado estilo 
QL del Spectrum* representa 
una mejora o no, depende 
mucho del estiio de 
mecanografia que usted 
posea; la provision de teclas 
separadas para las fund ones 
mas importantes sS representa 
una positiva innovation. Las 
secuencias de teclas 
originates del Spectrum (p. 
ej., [SYM SHIFT] +[0] para el 
punto y coma) dupfican los 
efectos de las teclas nuevas 
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Ciencia inf ormatica/LOGO 



Final del juego 

Con la aparicion de un fabuloso genio Mega a su fin nuestro juego 
de aventuras en logo 




Nuestro juego El saniuario de Zoltoth solo tiene in- 
corporados dos "peligros". En CUART0.4. el juga- 
dor se enfrenta a una serpiente poco amistosa, y el 
programa bifurca a un procedimiento de "peligro" 
especial: 

TO ATAQUES.SERPIEMTE 

PRINTL [[HAY UNA ENORME SERPIENTE] [QUE 

AVAMZA LENTAMEMTE HACIA Til]] 
EMD 

El otro "peligro" no coloca al jugador en ninguna 
situacidn de peligro fisico inmcdiato, pero, por cier- 
to, podria causar problcmas a largo plazo: 

TO PUERTA 

PRINTL [[UNA GRAN PUERTA OORADA SE 

CIERRA DETRAS DE Tl] [CERRANDOTE LA 

SALIDA POR EL SUR]] 

MAKE "PELIGROS [] 

MAKE "LISTA.SALIDAS [[N 7] [E 8]] 
END 

Hay otras consideraciones que en ciertos puntos del 
programa es necesario tener en cuenta. El procedi- 
miento COGER debe modificarse para que no se 
pueda recoger el anillo si se esta llevando la espada. 

TO COGERLO :ITEM 
IF :1TEM="ANILL0 THEN COGER. ANILLO 
STOP 

AGREGAR.A.INV :ITEM 
SACAR.DEL.CUARTO ;ITEM 
END 

TO COGER. ANILLO 

IF MEMBER? "ESPADA :INVENTARIO THEN PRINT 

[NO PUEDES RECOGER EL ANILLO] STOP 

AGREGAR.A.INV :ITEM 

SACAR.DEL.CUARTO :ITEM 
END 

Esta es la unica restriccidn en cuanto a que el juga- 
dor coja un objeto. Las siguientes rut in as permit en 
examinar lo que sea que este sosteniendo. 

TO EXAMINAR :0BJ 
IF :0BJ= "ANILLO THEN DESC.ANILLO 
STOP 

IF :0BJ= "COFRE THEN DESC.COFRE 
STOP 

IF :0BJ= "ESPADA THEN D ESC. ESPADA 
STOP 

PRINT [NO LLEVAS NADA ESPECIAL] 
END 

TO DESC.ANILLO 

IF AQUI? "ANILLO THEN PRINTL [[EN EL ANILLO 
HAY UNA INSCRIPCION BORROSA:] 

[R Ej] ELSE PRINT [NO VEO NINGUN 

ANILLO] 

END 



TO AQUI? :0BJ 

IF MEMBER? :0BJ :C0NTEN1D0 THEN OUTPUT 
"TRUE IF MEMBER? :0BJ :INVENTAR10 THEN 
OUTPUT "TRUE OUTPUT "FALSE 

END 

TO DESC.COFRE 

PRINTL [[ES MUY HERMOSO] [Y 
EVIDENTEMENTE VALE UNA PEQUENA 
FORTUNA] [HAY UNA PEQUENA CALAVERA 
TALLADA] [EN UNA ESQUINA DE LA TAPA]] 
END 

TO DESC. ESPADA m 
IF AQUI? "ESPADA THEN PRINT [ES DE ACERO] 
ELSE PRINT [NO VEO NINGUNA ESPADA] 

El jugador necesita la espada para matar a la ser- 
piente; si no la tiene, entonces es el ofidio el que lo 
mata a 61. 

TO MATAR :LA ■! 
IF :LA="SERPIENTE THEN MATAR. SERPIENTE 
STOP 

PRINT [NO PUEDES HACER ESO!] 
END 

TO MATAR. SERPIENTE 
IF NOT MEMBER? "ATAQUES, SERPIENTE 
:PELIGR0S THEN PRINT [NO VEO NINGUNA 
SERPIENTE] STOP 

IF MEMBER? "ESPADA :INVENTARIO THEN 
SERPIENTE.MUERE ELSE SERPIENTE. MATA 

ENDC 



E.MUERE El 



TO SERPIENTE.MUERE 

PRINT [LA SERPIENTE MUERE, ENROLLANDOSE 

EN SU AGONIA] 

MAKE "PELIGROS [] 
END 

TO SERPIENTE. MATA 

PRINTL [[TU NO TIENES NINGUN ARMA] [CON LA 
CUAL MATAR LA] [PERO AHORA YA ESTA 
TOTALMENTE ENLOQUECIDA] [TE MUERDE! TU 
ROSTRO SE ENSOMBRECE] [Y CAES AL SUELO 
RETORCIENDOTE]] 
MUERTO 

END 

El procedimiento MUERTO se anticipa sagazmente a 
aquellos jugadores que crean en la reencarnacion. 
Si, despues de haber muerto, usted digita cualquier 
otra cosa que no sea EMPEZAR, ;el ordenador le re- 
cordara que esta muerto! 

TO MUERTO 
PRINT [ESTAS MUERTO!] 
PRINT1 "? 

MAKE "INPUT INSTRUCCION 

IF (:INPUT ="EMPEZAR)THEN EMPEZAR STOP 
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PRINT [NO MEVENGAS CON ESO!] 
■ MUERTO 
END 

TO INSTRUCCION 

MAKE "INP REQUEST 

iF :INP=[] THEN PRINT1 "? OUTPUT 

INSTRUCCION 

OUTPUT FIRST :INP 
END 

Al frotar el anillo. ante los ojos del usuario hace su 
aparicion un genio: 

TO FROTAR :0BJ 
IF :0BJ= "ANILLO THEN FROTAR. ANILLO STOP 
PRINT [AHORA ESTA MUCHO MAS LIMPIO QUE 
ANTES] 

END 

TO FROTAR.ANILLO 

IFAQUl! -ANILLO THEN GENIO ELSE PRINT [NO 
VEONINGUN ANILLO] 

£••: 

k otrece Uevarlo a casa, pero si rechaza la 
nonces un fuerte viento lo llevara al 
on cuano situado en la parte oriental dc 
la cueva: 

TO GENIO 

PRINTL [[APARECE UN GENIO Y TE PR EG U NT A:] 
[•QUIERES QUE TE LLEVE DE REGRESO A 
CASA?"]] 

PRINT1 "? ~^ m m 
■-• = "RE3P FIRST INSTRUCCION 
IFANYOF:RESP="SI :RESP="STHEN 
REGRESAR ELSE SOPLAR 
E\D 




TO REGRESAR 

== \T [AL FIN EN CASA] 
: E :: 3ETRO :INVENTARIO THEN PRINT 
PBJCTTACIONES HAS ENCONTRADO EL CETROI] 
ELSE PRtKTL [[BUENO AL MENOS HAS 
E5CAPADO] (VIVO]] 



JhHWBMDUBfTOj 





r o d cafrc. i esK t 

i adwertencia pan no abririo: pero. ya se sabe. 
personas nunca aprenden!. y las conse- 
s. en este caso. son de imaginar. 

TO ABRIR :0BJ 

IF :0BJ= 'COFRE THEN ABRIR. COFRE ELSE 

PRINT [NOLO PUEDES ABRIR] 
z\Z 

-; -:- R. COFRE 
PRINTL [[HAY UNAARANA VENENOSA] [EN EL 
COFRE] [TE MUERDE]] 
MUERTO 



r : - ultimo, he aqui un listado de todos los sustanti- 
kk del juego: 



TO ESPADA 

OUTPUT "ESPADA 
END 

TO COFRE 

OUTPUT "COFRE 
END 

TO CETRO 

OUTPUT "CETRO 
END 

TO ANILLO 

OUPTUT "ANILLO 
END 

TO SERPIENTE 

OUTPUT "SERPIENTE 
END 

Si desea conservar el estado del juego para conti- 
nuar en otro momento, simplemente digile SAVE 
"AVENTURA, y se guardara todo el conienido del es- 
pacio de trabajo, Se reeuperara mediante READ 
"AVENTURA. 1 

En muchos sentidos, el logo es un lenguaje ideal 
para programar juegos de aventuras. Existe, no 
obstante, un problema: en las implementaciones 
del lenguaje que existen hoy en dfa, no hay sufi- 
ciente espacio. El juego que ofrecemos aqin apeiias 
si cabe en la asignacion de memoria para el Com- 
modore 64. Cualquier ampliation que se introduzca 
en nuestro juego de aventuras en looo exigira que 
el usuario adopte una decision respecto a que pala- 
bras conservar y cuales suprimir. 



Complementos al logo 

Algunas versiones de logo MIT no poseen EMPTY?, 
ITEM, COUNT ni MEMBER? Las def iniciones para las 
rnismas ya las hemos ofrecido. En todas las 
versiones LCSI, utilice 

EMPTYP por EMPTY? 
L1STP por LIST? 
MEMBERP por MEMBER? 
TYPE porPRINTI 
AND porALLOF 
ORporANYOF 

Hay una primitive EQUALP r que comprueba si sus 

isteyp*bf3seniugarc3ei^gnodeigiiald3d (que 
taxis para fctas solo en aJguras versiones LCSI). 
UsrtoK Fen d logo LCSI se demuestra 



IF EMPTYP :CONTENIDO[PRINT [NADA 
ESPECIAL]] [PRINT :CONTEN!D0] 

Si la condition es verdadera se lleva a cabo la 

primera lista despues de la condition; y, si es falsa, 

se Ueva a cabo lasegunda, 

En el logo Atari utilice SE por SENTENCE, RL por 

BEQUEST, y observe que ITEM no esta 

impfementada. 

La version que se ofrece en el fexto se ejecutd en eJ 
Commodore 64; puede ser que otras maquinas no 
posean espacio suficiente para ejecutar todo el juego 
tal como esta, Si fuera este el caso t tendra que 
reducir el tamano def juego, omitiendo algunas 
palabras descriptivas. 
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En el 
princi pio 

Iniciamos un nuevo proyecto: 
la construcci6n de un robot con 
ruedas y sensores de 
proximidad y de luz 



EI robot estara alimentado por dos motores paso a 
paso, que accionaran dos ruedas mediante un siste- 
ma de engranaje. Los motores paso a paso que uti- 
lizaremos se pueden eontrolar para girar en pasos 
discretos de 7,5°. Accionar el motor a traves de una 
caja de engranajes de un coeficientc de 25:2 signifi- 
ca que las ruedas del vehiculo se podran eontrolar 
con total precision para una rotacion del eje de 
0,6°. Dado que !os % motores paso a paso trabajan 
girando a traves de un angulo discrcto cad a vez que 
reeiben un impulso, result an ideales para el control 
a traves de un dispositivo digital. Emplearemos la 
puerta para el usuario del ordenador como nucstra 
fuente de control digital lo que nos permitira disc- 
nar un software sencillo para usar conjuntamcnte 
con el robot. Ademas de estar equipado con moto- 
res paso a paso, el robot ya acabado contara con 
una gama de sensores, incluyendo sensores de pro- 
ximidad y un par de sensores luminosos para per- 
mitir que siga una linea trazada en el suelo. Dado 
que se requieren cuatro Uncus dc datos de la puerta 
para el usuario para eontrolar los motores del vehi- 
culo, solo quedan disponibles otras cuatro lineas 
para las en trad as proven i en tes de los sensores. Para 
conseguir la maxima flexibilidad, el robot estara 
dotado de un sistema de "parches", Esto significa 
que a las cuatro lineas de datos disponibles se pue- 
den conectar distintas combinaciones dc sensores 
mediante algunos conectores montados en el robot 
y el empleo de cortos trozos de cable. Por ejemplo, 
puede que una aplicacion requicra los cuatro senso- 
res de proximidad, mientras que otra necesite dos 
sensores de proximidad y dos sensores luminosos. 
Con el sistema de parches los sensores requeridos 
se pucden enchufar directamente en las lineas de 
entrada de datos correspondientes. 

Al poder eontrolar el robot con toda precision, y 
dado que el mismo estara dotado de sensores, asu- 
miremos igualmente la tarea de disenar algo de 
software refinado para posibilitar la creation de un 
mapa interno del entorno inmediato del robot. En- 
tonces podremos comenzar a investigar los detalles 
propios de los algoritmos de planificacion de rut a y 
estrategia de busqueda. En este primer capftulo co- 
me nzamos con la construcci6n mecanica del robot. 
Esta es bastante directa e implica perforar y cortar 
la caja plastica que forma la carcasa y el chasis del 
robot; el posicionamiento del tren de engranajes y 
de los agujeros para el montaje de los enchufes 
debe ser exacto. 



CONECTORES PARCHES 




Primer paso 



En primer lugar corte los agujeros necesarios en la 
carcasa plastica que ha de alojary conformar el 
chasis del robot terminado. El diagrama i lustra la 
position y el tamano de los agujeros que se 
requieren. Los de los lados y la parte inferior de la 
caja van a recibir los ejes de las ruedas impulsoras. 
Los agujeros de montaje para el motor y el bloque de 
la caja de engranajes deben estar en tinea a traves de 
la caja, Los dos agujeros de la parte inferior van a 
recibir los dos pies que equilibran al robot sobre sus 
ruedas. El agujero de [a tapa es para el conector tipo 
D en el cual se enchufara el cable conector del 
ordenador. Para cortar los agujeros grandes para la 
caja de engranajes y los ejes, quite la mayor parte del 
plastico con un cuchillo caliente o un soldador 
Luego, con una pequena lima, vaya formando el 
agujero pulcramente hasta alcanzar el tamano 
adecuado 
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GABLES FLEXIBLES DE LOS PARCHES 




CGNEGTOR EtiCHUFE D 



SENSORES DE CONTACTO 
DE MICROIHTERRUPTOR 




0 D 



54 




J£S4. MQIfTAJE PIE 

r 



CORTE PARA EL TREN 
DE ENGRANAJES 



90 



AGUJ. MOKTAJE DEL 
TREN DE ENGRANAJES 



CORTE Pj 

l — i— r- 



ARAELEJE 



-^Li-r AGUJ. MONTAJE 
i 1 11TREN ENGRANAJES 




Lista de componenfes 



N.° Articulo 

1 40109 

3 Conector DIL de 16 patillas 

2 Resistencia de 100 ohmios 

2 Resistencia de 0,5 walros 270 ohmios 
2 Condensador de 0,1 \xf 
Condensador 25 V 1000 [.iF 
Veroboard de 24 franjas x 50 agujeros 
Bobina de cable estanado 
Enchufe D 15 vias 
Conector D 15 vias 
Cubierta D 15 vias 
Conector de potencia 2 P 1 mm 
Conector IDC 20 vias 
Conector marginal 24 vias 
Caja 180 x 110 x 55 mm 
Taco de tiras autoadhesivas 
Pie de gabinete 
Paquete tuercas 2BA 
Paquete tornillos 6BA de 0,5 pulgadas 
Paquete tuercas 6BA 
Paquete tornillos M5 de 25 mm 
Paquete tuercas M5 



PIEZAS DE RADIO 

2 Activador motor paso a paso SAA 1027 

2 Motor paso a paso 

2 Caja de engranajes sincronica 25:2 



VARiOS 

2 Ruedas Lego de 62 mm 
1 Paquete ejes technics 
4 m Cable piano de 12 vias 
1 m Cable piano de 20 vias 

1 Fuente CD 12 V 1 amp 

2 Tomillo 2BA x 4 cm 



El importe total de estos componentes puede que sea 
un poco alto; por este motivo el robot sera mas 
atractivo como proyecto de grupo o escolar que 
como trabajo individual 




ATENCION! 

El robot consume una gran canfrdad de energia; si 
la fuente de alimentation ha de activar asimismo 
fa caja buffer, entonces el robot no tended 
potencia suficiente y no se movera* Por 
consiguiente, el robot se debe conectar 
directamente a la puerta para el usuario de su 
ordenador, Siga fielmente las instructions: 
cualquier error podna danar su maquina 
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Bricolaje/Construccion de un rot 
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Puesta en escena 

Ahora diseriaremos rutinas para describir los escenarios del juego 
y permitir que el jugador se desplace a traves de ellos 



Las descripcioncs basicas dc todos los escenarios 
estan retenidas en la matriz ESS (vease p. 1247) y a 
ellas se puede acceder simplemente especificando 
el numero del escenario al que se ha llcgado. En El 
bosque encantado, la position que ocupa el jugador 
en cualquier momento dado se almacena en la va- 
riable P \\ por consiguiente, la description de ese 
empiazamjento esta almacenada en ESS(P). Cuan- 
do se cisenaroci originalmente los datos de los esce- 
warn :<:<_ se 7-. □ preseote el oomexto gramatkal final 
dfc b descx^ckm: esta se redacto siempre de modo 
dda par ~Ud. se halla.^". 
idUDL P. b desmprioa se puede 
i i¥ — H 1i lUifcifMtii i 
Uada en el capitiilo anterior, oofnbrando "Ud. se 
halla" con la description retenida para ese empja- 
zamiento en la matriz ESS(). Esto se puede apreciar 
en la linea 2010 del listado de El bosque encamado. 

Ademas de la description basica del lugar al cual 
ha llegado. el jugador deseara saber tambien si ahi 
hay aigun objeto. Los objetos utilizados en el juego 
estan almacenados (junto con sus posiciones initia- 
tes en el inventario) en una matriz bidimensional, 
!VS(J. Por ejemplo, IV$(N,1 ) contiene la description 
del objeto N del inventario, y 3V$(N,2) contiene su 
position. Si queremos determinar si en un emplaza- 
miento determinado hay o no un objeto, debemos 
buscar en el inventario, cutejando la position de 
cada objeto con el numero del escenario que se esta 
cfcscribiendo. Dado que en El bosque encantado 
6k> nay tres objetos, y ocho en Digitaya, se puede 
■piemen tar una simple busqueda lineal emplean- 
i _- =:= NEXT. 

O brie de busqueda utilizado en El bosque en- 
€mmarie> en eocre las Mneas 2040-2080, Se explora 
_ ~zL-. — ~ --- .- r:i:riz deHnvcntario en 

mro P. QoAk mix una coincidencia , en 

.'orrespondiente a la 
: los oojeios- Puesio que en cual- 
r escenario en un momento dado podria haber 
n*as de un objeto, debemos dar lugar a la eonstruc- 
dou de una frase en la cual se orrezca una lista de 
objetos, separados cada uno por una coma. Me- 
diante el empleo de SP$ } inicialmente como una 
serie nula y luego como una coma, podemos inser- 
tar la puntuacion correcta entre cada item. Un flag, 
F, establecido inicialmente en cero, se pone a uno 
para indie ar el hecho de que en el transcurso de la 
busqueda se ha encontrado un emparejamiento. Si 
al final de la busqueda el flag continua a cero, ello 
significa que no hay ningun objeto presente, y este 
hecho se le puede transmitir al jugador, como ocu- 
ne en la linea 2090 de El bosque encantado. 

2000 REM DESCRIBIR ESCENARIO **** 
2010 SNS="Ud, SE HALLA n +ES$(P):GOSUB5500 
2020 SN$^ M VE" 

2030 REM VERIFICAR INVENTARIO PARA 0EJ M 



2040 F=G:SP$=" ,h 

2050 FOR 1-1 TO 3 

2060 IF VAL(IVS(I,2))<>P THEN 2080 

2070 SNS=SNS+SP$+"UN " + ):F- 1 :SP$=° , " 

2080 NEXT I 

2090 IF F=0 THEN SN$-"N0 " + SNS+' L NINGUN OBJETO 
2100 GOSUB550Q:REM FORMATEAR SALIDA 
2110 RETURN 

Los datos que contienen los detalles relativos a las 
posibles salidas desde cada escenario estan reteni- 
dos en la matriz SL$(). Cada valor de la serie esta 
compuesto por ocho digit os. Subdividiendo estos 
ocho digitos en grupos de dos, obtenemos (de iz- 
quierda^a derecha) los numeros de los escenarios 
que hav hacia el none, el este. el sur y el oeste del 
escenario en curso. Con el nn de determinar las po- 
sibles salidas, el program a primero divide la serie 



Habitation con Have 

Los detalles de Ids escenarios 
estan almacenados en tres 
matrices en serie, que contienen 
nombresde objetos ysu 
ubicacion (V$), las salidas 
desde los escenarios (SLS) y 
descripciones (ESS). SL$(34), 
porejemplo, podriacontenerel 
numero de ocho digitos 
33390027, mostrando que el 
escenario 34 esta conectado con 
los escenarios 33, 39 y 27. 
ES$(34) contiene 'En la mitad 
de la memoria ", que describe 
escenario 34. IV$(2,2) contiene 
el numero 34, indicando que 
IVS(2,1)(Lallave) esta en el 
escenario 34. 



Detalles del emplazamiento 



INVENTARIO 






LLAVE 
















mi,) 





SALIDAS 



DESCRIPC10N 



33 39 00 27 



(34) 



£N LA MITAD DE LA MEMORIA 
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de ocho dfgitos en los cuatro numeros que descri- 
ben que escenario hay en cada direcci6n. 

2300 REM Wi * S/R DESCRIBIR SALIDAS **** 

2310 SLS=SLS(P) 

2320 NR = VAL(LEFT$(S L$ r 2)) 

2330 ES=ML{MIDS(SLS.3,2» 

2340 SU^VAMMIDSfSLS^^)) 

2350 0E=VAL(RIGHT$(SL$,2)) 

Si en una direccion dada no hay salida, el valor 
asignado es cero: y esto es de gran ayuda para la 
descripeion de las salidas. Se debe efectuar una ve- 
rification preliminar para ver si hay alguna salida 
posible antes de empezar a construir la oration 
"Hay salidas hacia el...". Esto se puede hacer 11c- 
vando a cabo un OR logico sobre las cuatro varia- 
bles de direccion, y esto solo producira un resulta- 
do de cero si las cuatro variables de direccion fue- 
ran cero* Si no resultara de esta forma, entonces la 
rutina continua para comprobar cada una de las va- 
riables de direcci6n de una en una. Si la variable no 
es cero, se le anade a la frase la direccion corres- 
pondiente. 

2355 IF(NR OR ES OR SU OR 0E)=0THEN RETURN 
2360 PRINT;SN$= l, HAY SALIDAS POR EL " 
2370 IF NR<>0 THEN 1 SNS=SNS+ "NORTE " 
2380 IF ES<>0 THEN SMS=SN$+"ESTE " 
2390 IF SU<>0 THEN SN$=SN$+ I< SUR " 
2400 IF OEoO THEN SN$-SN$+"QESTE " 
2410 GOSUB 55Q0:REM FORMATEAR 
2415 PRINT 
2420 RETURN 



Desplazamientos 



Ahora que ya nemos desarrollado rutinas que des- 
cribe n cada escenario, podemos desarrollar proce- 
dimientos que le permit an al jugador hacer cos as 
en el mundo que hemos creado. En un futuro eapi- 
tuio del proyecto estudiaremos algoritmos mas de- 
tail ados que analizan instrucciones* De momento 
nos ocuparemos de las instrucciones de movimiento 
que puede impartir el jugador simplemente entran- 
do una instruction de una sola palabra, como 
"NORTE" o "SUR". Si una de tales instrucciones 
se le pasa a una subrutina de movimiento como la 
variable NN$, entonces la rutina de movimiento es 
la siguiente: 

3500 REM **** S/R MOVIMIENTO 

3510 MF=1;REM ESTABLECER FLAG MOVIMIENTO 

3520 DR$=LEFT$(NN3,1) 

3530 IF DR$<>" N"ANDDR$<>"E"ANDDR$<> "S'ANDDRS 

O'O'THENGOTOSSSO 
3540 IF DR$= M N"AND NR<>0 THEN P=NR: RETURN 
3550 IF DR$="E"AND ES<>0 THEN P=ES:RETURN 
3560 IF DR$="S'AND SU<>0 THEN P=SU:RETURN 
3570 IF DR$="0"AND OEoO THEN P=OE:RETURN 
3580 PRINTrPRINT'NO PUEDES ";ISS 
3585 MF=0: RETURN 

3590 REM ** NOMBRE NO DIRECCION " 
3600 PR I NT" QUE ES ";NN$;" T 
3610 MF^O: RETURN 

Esta rutina en re alidad solo em pie a la prim era letra 
de la instruccion de direccion que se le pasa. Co- 
rn ienza por comprobar que la instruccion sea real- 
mente una direccion. De ser asi, se actua sobre la 
direcci6n especificada en la instruccion. De spues 
de asegurarse de que hay una salida en esa direc- 
ci6n, se cambia P (la variable que lleva el registro 
de la position del jusador) por el valor de NR. ES, 
SUuOE. 

Sin embargo, antes de que podamos utilizar las 
subrutinas que hemos desarrollado aqui, necesita- 
mos unirlas para que conformen un bucle repetiti- 
vo. El diagrama de flujo ilustra la estructura logica 



de este bucle principal de 11a mad a. Si bien esta no 
es la estructura final del buck principal del progra- 
ms, sirve para demostrar los aspcctos que hemos 
cubierto hasta ahora. Para utilizar las subrutinas 
dadas aqui, inserte las siguicntes lineas, que consti- 
tuycn una parte del bucfe principal 

200 GOSUB6000:REM LEER DATOS MATRIZ 

210 P=INT(RND(TI)*10+1):REM PUNTO DE PARTI DA 

230 REM AQUI EMPIEZA EL BUCLE PRINCIPAL **** 

240 MF=0:REM FLAG MOVIMIENTO 

245 PRINT 

250 G0SUB2000:REM DESCRIBIR POSICION 
255 GOSU82300:REM DESCRIBIR SALIDAS 
260 PR I NT:J N PUT" IN STRUCCI ON ES " ;l SS 

Tambien incluya las siguientes lineas en el bucle de 
llamada principal: 

270 NNS=ISS;G0SUB 3500:REM MOVIMIENTO 
280 GOTO 230;REM RECOMENZAR BUCLE 
PRINCIPAL 




INICIO 



Leer matriz 
datos 



Establecer valor 
initial de P 



-* — 



oooxxxxxxx 

IF 




Describir 
escenario P 




Describir salidas 
desde P 



Entrar 
direccion 





Modificar 
valor de P 



Juego de aventuras/Programacibn 



Para el Spectrum 

Debido a que el Spectrum retiene todas las matri- 
ces en serie como series dc longitud fija. surgen 
problemas cuando deseamos imprimir uno de los 
elementos de una matriz en serie como parte de 
ana frase mas larga, Cuando se dimensiona una 
matriz en el Spectrum, el ultimo numero de la sen- 
tencia define la longitud de cada elemento de la 
matriz. For ejemplo, DIM a$(3,2 h 20) dimensiona 
una matriz de tres por dos elementos, teniendo 
cada elemento una longitud fija de 20 caracteres. Si 
asignamos un elemento de la matriz a una serie de 
menos de 20 caracteres, entonces la diferencia se 
compensa agregando espacios al final de la serie. 
Esto supone un precioso espacio de memoria. Por 
lo tanto, debemos antes que nada eliminar cual- 
quier espacio en cola. Para hacer esto, los usuarios 
del Spectrum deben digitar la siguiente rutina en el 
listado de El bosque encantado: 

7000 REM **** P0DAD0 SPECTRUM **** 
7010 FOR l=LEN(AS)T0 1 STEP -1 
7020 IF AS(I TO l)<>" " THEN LET N=I:LET 1-1 
7030 NEXT I 

7040 LET SS=S3+AS(T0 N) 
7050 RETURN 

Para el listado del Digitaya, digite estas mismas ins- 
trucciones pero emplee los numeros de linea del 
8500 al 8550, 

Esta rutina trunca A$, eliminando todos los espa- 
cios poster! ores, antes de agregarsela a SS. Recuer- 
de que SS es la variable utilizada para ensamblar 
una frase para su formateado. Para emplear esta 
rutina debemos pasar a la variable AS el elemento 
de la matriz en serie (a incorporar a la oration), y 
despues Ilamar a la subrutina. Por consiguiente, en 
las versiones de El bosque encantado y Digitaya 
para el Spectrum, hemos de introducir estos cam- 
bios: 

E! bosque encantado: 

2010 LET SS= i; U0 SE HALLA":A$=L$(P): 
eOSUB7D00:GOSUB5500 

:r: _r =e=ss— -s— -u\ ":as=vs(i.d: 
::s„s~::: -=- _r ps=\ 

Digrtarya: 

1450 LETSS= „: 5 : A5=_5 = 

G03UB8500:GGSUB5880 

1500 IFVAL(VS([ 1 Z))=PTHBH£T 
SS=SS+PS+ :i UN :AS=V5(U): 
GOSUB85001ET F=1:LET PS=" " 



Listado "Digitaya" 

La estructura de Digitaya es similar a la de El 
bosque encantado. Agregueles las siguientes Kneas 
a los listados que hemos ofrecido hasta ahora: 

1100 G0SUB 6030:REM LEER DATOS MATftIZ 
1210 PRINT;INPUriNSTRUCCIONES";ISS 
1120 P^47:REM PUNTO DE PARTI DA 
1130 : 

1140 REM ' *** AQUI EMPIEZA EL BUGLE PRINCIPAL **** 
1150 : 

1160 IWF=0:PRINT 

1170 G0SUB1 440:REM DESCRIBIR ESCENARIO 
1160 &OSUB1560:REMLISTARSAUDAS 

Incluya, asirnismo T estas Ifneas: 

1220 NNS=ISS:GOSUB2000:REM MOVER 
1230 GOTO 1140:REM REINICIAR BUGLE 
PRINCIPAL 

Describir escenario y salidas 

1440 REM **** 5/R DESCRIBIR POSICION 

1450 SNS="UD5E HALLA "+ESS(P):GOSU85880 

1460 SNS="VE ■ 

1470 REM " BUSQUEDA DE QBJETQ 4T 
1430 F=0iSP$=* " 
1490 F0RN1T08 

1500 IFVAL[IVS(I,2))=PTHEN SNS-SNS-hSPS+^UN" 

+ IVS(!,1):F=1:SPS= ki 11 
1510 NEXT I 

1520 !FF=0THENSN$="NG H +SNS+'NINGUHOBJETO- 
1530 G0$UB5880:REM FORMATEAR 
I5« RETURN 
1550 

1560 REM S-'ft LlSTASAUDAS 

1570 SLS=SLS(P) 

1580 NR = VAL(LEFTSi SLS, 2)) 

1590 ES=VAL(MID$(SLS,3.2)> 

1600 SU=VAL(MIDS(SLS,5,2)) 

1610 0E-VAL(RIGHTS(SLS.2)) 

1620 IF(NR OR ES OR SU OR 0E)=0THEN RETURN 

1630 P R I NT: SN3S— Ll HAY SAL I DAS HACIA EL 11 

1640 JFNRoOTHEN SMS= SNS+" NORTE " 

1650 IF ESoO THEN $N$=SN$+ "ESTE " 

1660 IFSU<>0THENSN$=SNS+' SUR " 

1670 IFOEoOTHEN SNS-SNS+^OESTE " 

1675 G0SUB5880:REM FORMATEAR 

1680 PRINT: RETURN 



Subrutlna Moverse a 

2000 REM S/R MOVERSE A**** 

2010 MF=1:REM ESTABLECER FLAG MOVIMIENTO 

2020 DRS=LEFT$(NN$,1) 

2030 IFDRSo' N "AND0R$O"E" ANDDRSo S 'ANDDRSo 0 
THEN21O0 

2040 IFDRS-"N" ANO NRoOTHEN P=NR:RETURN 
2050 IF DRS- S ' AND SU<>0 THEN P=SU:RETURN 
K-tQ F0RS=-E" AND ES<>0 THEN P-ES: RETURN 
DBS^'O" AND OEoO THEN P=0E:RETURN 



Complementos al basic 

Spectrum: 

En los listados paraambos juegos, reemplace 
SL$() por E$(), SLS por X$, SMS por SS, IS$ 
por TS, ES$() por L$(), NN$ por R$, SP$ por 
P$, DR$ por D$. En el listado de Digitaya 
sustituya las siguientes Ifneas: 

1580 LETNR=VAL(X$(T0 2)) 
1590 LETES=VAL(X${3T0 4)) 
1600 LETSU=VAL(X$(5T0 6)) 
1610 LET0E=VAL(XS(7T0)) 
2020 LETD$=R$(T01) 



En el listado de El bosque encantado, sustituya 
las siguientes Ifneas: 

2310 RAND0MISE:P=INT(RND(1)*10+1) 

2320 LET NR=VAL(X$(T0 2)) 

2330 LETES=VAL(X$(3T04)) 

2340 LETSU=VAL(X$(5T0 6)) 

2350 LET0E=VAL(X$(7T0)) 

3520 LETD$=R$(T01) 

BBC Micro: 

En el listado de El bosque encantado, realice la 
siguiente sustitucidn de li'nea: 

2310 P=RND(10) 



Juegos 



Cangrejos 

He aqui la version para el Commodore 64 de este entretenido 
juego 



Usted debe ayudar a un pobre camaron a regresar 
al mar, evitando a los voraces cangrejos que pue- 
blan la pi ay a, Cada camaron que logre adentrarse 
en el agua le proporcionara 10 puntos. Dispone de 
cinco rut as para intentar obtener su puntuacion ma- 
xima. Utilice las teclas W para avanzar y Z para re- 
trocctkr . 




HE<S> REST. 

16 



10 Rat " CANGREJOS 1 

15 RBK " 

20 GOTO 1000 
v : = V \a zS 
-" — \~ \l -S: 
70 PRINT B8S;BSS: 
i: \7 l .S:BS. 
9Q PRINT NS-AS" 

100 AS=RH3HT5{ASJ)HEFTSlA$ 1 39} 
110 BS=aiGHTS{BS.39)+LEFI(BS r 1) 
120 GET XS 

130 P = P-40" ((XS= " W )- (X£- "Z" )) 
140 IF P>P1 THEN P=PI 
150 IF P=PA THEN 2000 
160 C=PEEK(P) 

170 IF C<>32 AND Co CP THEN 3000 
1B0 POKE P1,CR 

■=: - i --\ 9 

190 POSE P. CP 
200 P1=P 
210 FOR 1=1 TO 6 
220 PRINT HHS" 
230 NEXT [ 
240 T=T-r1 

250 If T=500 THEN 3900 

260 GOTO SO 
1000 POKE 53280,6 
1010 POKE 53281 J 
1015 PRINT CHRS(147)- 
1020 XS=' " 
1030 AS-" - 
1040 BS=" " 

1046 S =54272 

1050 PA=1244 

1060 P1-1504 

1070 P=Pt 

1080 P1=P 

1090 CP=31 

1100 CR=32 

1110 KhS=I-= -3 

1120 553 = --=5 

1150 TS-MS{1$ 

1160 RESTORE 

1165 FOR 1=1 TO 40 

1170 READ A 

1180 AS=AMHRSW 

1190 NEXT I 



1200 B£=A£ 
1260 NP=5 
1265 T=0 
1270 S=0 

1280 XHNT(RND[TI)-37)-2 

1290 AS=fllGHTS(AS h X)^LEFTS(AS.40-X) 

13DQ PRINT TS; 

1310 FOR 1=1 TO 17 

1320 PRINT BBS; 

1330 NEXT I 

1340 PRINT NSfVlOA(S)[1 SPC] REST, [1 .SPC]:" :NP 
1350 PRINT 

1 360 PRINT NS; " PU NT0S[ 1 SPC]:" ;S S 

1380 FOR 1=1 TO 13 

1390 PRINT RHS; 

1400 NEXT I 

1410 GOTO 50 

2000 S=S+10 

2010 POKE PUR 

2O20 P-Pi 

2030 P1-P 

2040 GOTO 1280 

3000 POKE PUR 

3020 P=PI 

303O P1=P 

3100 V0=54296 

3110 WA=54276 

3120 AA- 54277 

3130 HF- 54273 

3140 IF- 54272 

3150 SS= 54278 

3160 PH= 54275 

3170 PL-54274 

3180 P0KEVO,15 

3190 POKE WA,65 

3200 POKE M.19Q 

3210 POKE PH. 15 

3220 POKE PL, 15 

3300 FOR 1=1 TO 11 

3310 READ H 

3320 READ L 

3340 READ 0L 

3350 GOSUB 370O 

3360 NEXT I 

3370 RESTORE 

3380 FOR 1=1 TO 40 

3390 READ A 

34D0 NEXT I 

3500 NP=NP-1 



3510 IF NP-0 THEN 4000 
3520 GET XS 
3530 GOTO 1280 
3700 POKE HF.H 
3710 POKE LF,L 
3720 POKE SS.136 
3600 FOR J=1 TOOL 
3810 NEXT J 
3820 POKE HF.O 
3630 POKE LF.O 
3340 RETURN 
3900 PRINT CHRS(147J; 
3910 FOR 1-1 TO 12 
3920 PRINT 
3925 NEXT I 

3930 PRINT TA8(12' **[1SPC]TIEMP0MSPC] TRANSCURRID0[1SPCr 
3940 FOR 1-1 TO 1000 
3950 NEXT I 

4000 IF S>R THEN R=S 

4010 NB=0 

4020 PRINT CHR£(147); 

4030 FOR 1=1 TO 7 

4040 PRINT 

4050 NEXT 1 

4060 PRINT TA8(16)fPUNTOS[1SPC]:"; 
4070 PRINT S 
4080 FOR 1=1 TO 4 
4000 PRINT 
4100 NEXT I 

4110 PR I NT TABfl 2) " PUNTUACION [ 1 SPC] MAXI MA[1SPC]:"; 
4120 PRINT R 
. 4130 FOR 1=1 TO 4 
4140 PRINT 
4150 GET X£ 
4160 NEXT I 

4170 PRINT TAB(1 6) ; " 0TRA[ 1 SPC] ?" 
4180 GFJ.XS 

4190 IF X$=" - THEN 4130 
4200 END 

10000 DATA 117,184,105,32,32,117,134,105 
10010 DATA 32,32,32,1 17, 184,105,32,32 
1 0020 DATA 117,184,1 05.32 , 32,32, 32 ,32 
10030 DATA 1 1 7.184,105.32,1 1 7,184, 1 05 
10040 DATA 32,32,117,184,105,32.32,32,32 
20000 DATA 3,147,400,8.147,300 
2001 0 DATA 3,147. 1 00,8, 1 47 , 400 
20020 DATA 10,60,300,9.159,100 
20030 DATA 9.159,300,8,147,100 
20040 DATA 8.1 47.300. B,23 r l00 
20050 DATA 3.147.400 
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Las tres ultimas 
ordenes 

Ya solo nos quedan por disenar tres ordenes para tener listo 
nuestro programa depurador, pero antes nos referiremos al 
mecanismo de interrupcion 



Antes de ocuparnos de las ordenes debemos tener 
en cuenta el mecanismo de interrupcion, cl cual cs 
empleado en el programa original cn los puntos de 
ruptura. dondc hemos sustituido una instruction 
eon el opcode SW! (SoftWare Interrupt). El SWL al 
igual que las restantes interrupciones del 6809. es 
aceedido a traves de una position especifica de me- 
moria. a saber. la SFFFA. Esto signifies que cuando 
se ejecuta un SWI los registros se guardan en la pila 
y e! procesador earga la direction de 16 bits que hay 
cn SFFFA y SFFFB en el contador de programas | PC 
Dcsde esa direction comienza entonces la ejecu- 
cion. Nuestra mision es cambiar este vector para 
que senale el punto de entrada de nuestro progra- 
ma depurador. Aqui surge el probfema de que los 
vectores suelen encontrarse en la ROM. El hecho 
de que estas direcciones sean f'ijas significa que el 
sistema operativo debe tener otros medios para 
'Vectorizar" las interrupciones. 

Ei sistema normal consiste cn disponcr de una 
tabla de salto (vease p. 1119) col oca da cn una zona 
de trabajo dc la RAM, que es una parte de la me- 
moria no disponible generalmente para programas 
y reservada a ciertos usos del sistema operativo. La 
direction serialada cn el vector contiene una ins- 
truccion J MP (Jump: sal tar) scguida de una dircc- 
cion. que por lo general vol vera a senalar al sistema 
operativo. Pero esta direction puede ser cambiada 
por la que se requiera, de modo que la primer a ins- 
truccion ejeaifada despues de La interrupcion de 
software sera una JMP de salto a la direction de 
entrada del programa deptirador. Hay que cuidar 
de sustituir cl contenido original de La labia de salro 
antes dc que nuestro programa acabe su ejeaaciOG. 
ya que siempre es posible que el sistema operative 
ejecute despues un SWL Vale la pena recorder que 
el 6809 tiene tres interrupciones de softw are, y que 
no hay razon alguna para no usar SWI 2 (opcode 10 
3F y vector cn SFFF4) o SWI3 (opcode 11 3F y vector 
cn SFFF2), aunque cl que cstas cmplccn opcodes de 
dos bytes hacc neccsario algunos cam bios en cl pro- 
grama depurador. 

Otro problema es que nuestro programa solo 
puede ocupar cualquier sitio de la me moria que el 
programa a depurar deje libre. El depurador debe, 
pues, ser reubicable. De hecho habra notado que 
todas las referencias a posiciones de memoria en el 
programa hecho o por hacer emplean un direccio- 
n ami onto relative al contador dc programas. Pero 
en un cierto punto debemos saber la direction ab- 
soluta del punto de entrada del programa para 
poder coiocarlo en la tabla de salto de interrupcio- 
nes. Tal direction se tendra que calcular en tiempo 



de ejeeucion, dado que el ensamblador no lo puede 
hacer. 

Nuestra primcra tarea sera calcular esta dircc- 
cion e insertarla en la tabla de salto. Se observara 
que la direction del punto de entrada para el SWI 
sera distinta de la direction de initio del programa 
depurador. pucsto que la rutina existenre en la di- 
rection de initio del programa debe encargarse del 
procedimiento de initialization, que no se necesita- 
ra cuando se vuelva a entrar en el programa a tra- 
ves del SWI. Segun esto. debemos ocuparnos de 
toda la initialization dentro de una sub rutina; el 
punto de entrada sera la direction que contiene la 
instruccion despues de la llamada BSR a esta subru- 
tina, Es muy convemente que esta direction sea 
precisamente la que se guardo cn la pila por medio 
de la llamada BSR para que podamos tomarla dc La 
pila y colocarla cn cl punto adecuado dentro de la 
tabla de salto. 

Otra mision del procedimiento de initialization 
es la de obtcner la dircccion de initio del programa 
a depurar. 

He aqui su diseno completo: 

Procedimiento de 
initialization 

Data: 

Vector-Direccion es la direction que ha de 
encontrarse en SFFFA en X 
0p«KJe-JMP es el opcode de la instruccion JMP 
en A 

DirecctM-Eiitrada es ta direction del punto de 
entrada en Y 

: r : o :e z zyi^n izi^v-r Z 

PtQceso: 
Tomar Vector-Oirecaon 
Almacenar Opcode-JMP en Vector-DirEcoon 
Tomar Direccion-Entrada 
Almacenarfa en (Vector-Direction +1) 
Tomar Direccion-lnicio del teclado 
Guardarla 

Ahora ya podemos afrontar la tarea de codiflcar las 
tres ordenes restantes, Algo que tambien debemos 
tener cn cuenta afecta a una de estas ordenes, en 
concreto la orden R que visual iza los registros. Na- 
turalmente no deseamos visuafizar el contenido ac- 
tual de los registros micntras se ejecuta el programa 
depurador, si no que queremos inspeccionar su con- 
tenido en el momento de ocurrir el punto de ruptu- 
ra. Qui ere decir que lo que nos intercsa es saber ios 
valorcs que la instruccion SWI hizo colocar en la 



B 


fnsertar punto ruptura 




Desinsertar punto ruptura 


D 


Visual iza r puntos actual es de 
ruptura 


3 


Inicio ejecucirjn programa 


2 


lr o reanudar el programa desde 
donde se corlo 


P 


Visualizar el c-ontenirJo ds tos 
regislros 


V. 


Inspeccionar y cambiar la 
■ de la memoria 


: 


Abartdonar ef programa 
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pila. Sin embargo, puede haber sucedido que en la 
pi! a se hayan colocado cncima otros valores cuando 
vayamos a inspeccionar la pila, Podemos calcular el 
numero de bytes colocados en la pila que no nos 
interesan y descartarlo para obtener los valores de 
los rcgistros. Pero es mas sencillo guardar el valor 
del puntero de la pila en cl momcnto de la interrup- 
tion y emplearlo de spues como referenda. 

En la codification de R supondremos que hemos 
realizado lo anterior y que no hay problema en ob- 
tener este contenido de los registrar La estructura- 
cion de la rutina es tnmediata, solo tenemos que 
tomar cada valor, uno tras otro, sin sacarlos de la 
pila y visualizarlos con etiquetas adecuadas. La 
unica exception sera el valor S, que ser£ el valor 
anterior a la interruption y puede obtenerse ana- 
diendo la cantidad precisa al valor guardado de S 
que empleamos como referencia de los valores de 
los registros colocados en la pila. 



La orden R 



Puntero-Pila es el indicador de la posicion superior de 
la pila despues de la interruption en X 
Valor-Byte -In d i vidua I retiene los valores de los 
registros de un solo byte en B 
Valor-Byte-Doble retiene los valores de los registros 
de dos bytes en D 

Etiquetas contrene las etiquetas relativas a los 9 regs, 
Proceso: 
Tomar Puntero-Pila 
Cargar CC en Valor-Byte-Individual 
Visualizar etiquetas(1 ) , Valor-Byte-Individual 
Repetir !o anterior para A, B y DP 
Cargar X en Valor-Byte-Doble 
Visualizar Etiquetas(5). Valor-Byte-Doble 
Repetir lo anterior para Y ; U y PC 
Sumar 12al valor original de Puntero-Pila 
Visualizar Etiquetas(9) 1 Puntero-Pila 



Faltan dos ordenes mas: la orden Q ? abandon ar 
(quit) cl programa, que no necesita en si una rutina 
especial; y la orden G, reanudar la ejecucion tras el 
punto de ruptura. En este punto debemos sustituir 
la instruction SWI que motive la niptura con la ins- 
truction original reemplazada por ella y posterior- 
mente devolver el control a dicha instruccion, Es 
facil rcstablecer los registros a su contenido original 
con el solo empleo de RTI, que los hace salir a todos 
de la pila. Pero se debe tener en cuidado de que el 
valor del PC tornado de la pila sea el valor de la 
instruccion siguiente. Ya que el que deseamos se 
obticne anadiendo un uno, debemos ajustar el 
valor en la misma pila antes de volver. 



La orden G 



Data: 

Tabla-Puntos-Ruptura es tabla de 16 bits de tales pts. 
Valores-Sustituidos es una tabla de opcodes 
sustituidos por instrucciones SWI 
Puirto-Ruptiira-Sigmente es un numero entre 1 y 16 
Punfero-Pila es el valor guardado del puntero de la 
pila despues de SWI 
Proceso: 

IF Punto-Ruptura-Siguiente >0 AND <=1 6 THEN 
Tomar opcode de Valores-Sustituidos (Punto- 
Ruptura-Siguiente) 

Almacenarlo en la direccidn contenida en Tabla- 
Puntos- Ruptura (Punto-Ruptura-Siguiente) 
Colocar en S el valor de Puntero-Pila 
Decrementar el valor de PC en Ja pila 
Incrementar Punto-Ruptura-Siguiente 
Retorno de interrupci6n 
ELSE 

Retorno de s u b rutina 

Con la siguiente lection finalizaremos el curso de 
lenguaje maquma del 6809. En ella codificaremos 
el modulo principal de nuestro program a depura- 
dor y explicaremos como opera el programs. 



Asy rMido Uempo 

EJ programa depurador 
comienza con una llamada BSR 
a la rutina de inicializacion, 
seguida del comienzo del bucle 
del programa principal. Una de 
las tareas de fa initialization es 
ta d e deter mi nar la direccion 
absolute de este comienzo de 
bucle y copiarla en la tabla de 
salto de interruption, de modo 
que cuando se ejecute un SWI 
se pase el control por la tabla de 
safto y vuelva al comienzo del 
bucle. Esta direccion no puede 
conocerse por anticipado dado 
que el programa ha de ser 
iofafmente reubicable. Por 
: a : r ecci6r. de retorno 
ptiesta en la pila por BSR es 
predsamente la direccidn en 
cuesljfjfl, lo que quiere decir que 
a nrnna de inicializacion solo 
necesiis copiarla de la pila a fa 



Direccionar la Question 



VECTOR SWI 



MEMORIA PROGRAMA 



PC 



SC0 15 



TABLA DE SALTO 



SC04&-JMP ENTRADA 



PROGRAMA 



BSRINfC 



COMIENZA BUCLE PRIMC 



iNIC: 



ENTRADA 



PILA 



SIG. BYTE LIBRE 



ENTRADA 



COPIA DIR. ENTRADA 



TOMA DIR. INICIO 



ALMAC. DIR. INICIO 



RTS 
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Procedimiento de inicializacidn 



START 

j inn i 


R M R 
n l v l u 


2 


Para guardar dir. fnicio {start) 


LDA 


Y+ 


Segundo caracter de la etiq . 


OPJMP 


FCB 


SOE 


Qpcode-JMP 


BSR 


OUTCH 


Lo visualiza 


IN IT 


i nx 

LLJ A 


■5FFFA 


Toma Vector-Di reccidr 


i nA 


SPACE P-CR 






LDA 
STA 
LDY 


OPJMP.PCR 

,x+ 

1,S 


Toma Opcode-JMP y lo guarda 
en Vector- Direction 

Toma Dir.-Entrada de la pita 


BSR 
LDD 


OUTCH 

,X++ 


Toma reaistro siguierrte y lo 
pone en valor- Doble-Byte 




STY 


,x 


La guarda en Vector-Dir +1 


BSR 


DSPADD 


visualiza Valor-Doble-Byte 




BSR 


GETADD 


Toma del teclado Dir.-lnicio 


PULS 


A.PC 


Restaura Ay retoma 




STD 


START, PCR 


La guarda 










RTS 




Return 









Orden G 



Orden R 



STACKP 


RMB 


2 


Puntero-Pila 


LABELS 


FCC 


'CCABDPXY 












c^n /inc. 

SPACE 


FCB 


32 


Espaoo en codigo ASCI 1 


CMDR 


PSHS 


A.B.X.Y 


Guarda registros empleados 




LDX 


STACKP, PCR 


Toma Puntero-Pila 




LEAY 


LABELS, PCR 


Emplea Y para apuntar a la 

trllifUtrld 




LDA 


#4 


Num. de regs. de un solo byte 


rUnU 1 


BSR 


CMDR1 


vtsudHZd reyisiru Sfyuienie 




DECA 




cuatro veces 




BGT 


FOR01 






LDA 


#4 


Num. de regs. de dos bytes 


FOR02 


BSR 


CMDR2 


Visual iza registro siguiente 




DECA 




cuatro veces 




BGT 


FOR02 






LDA 


,Y+ 


Primer caracter de la etiq. 




BSR 


OUTCH 


Lo visualiza 




LDA 


,Y+ 


Segundo caracter de la etiq. 




BSR 


OUTCH 


Lo visual iza 






SPACE.PCR 


Visualiza el espacio 






OUTCH 








1 _ 














BSR 


DSP ADD 


IMS 




PULS 


A.BXY.PC 






' Subrutina para wsu*ar wi in 




CMDR1 


PSHS 


A 






LDA 


,Y+ 


Primer caracter de la etiq. 




BSR 


OUTCH 


Lo visualiza 




LDA 


,Y+ 


Segundo caracter de la etiq. 




BSR 


OUTCH 


Lo visualiza 




LDA 


SPACE.PCR 


Visualiza el espacio 




BSR 


OUTCH 






LDB 


,X+ 


Toma reg, sig. pomGndolo 






en Valor-Byte-Individual 




BSR 


DSPVAL 


Visualiza Valor- Byte- Indiv. 




PULS 


A,PC 


Restaurs A y retoma 




* Subrutina para visualizar un registro tie dos bytes 


CMDR2 


PSHS 


A 


Guarda A 




LDA 


,Y+ 


Primer carter de la etiq. 




BSR 


OUTCH 


Lo visualiza 



BPTAB 


RMB 


32 


Tabla-Puntos-Ruptura 


REMTAB 


RMB 


16 


Valores-Sustituidos 


NEXTBP 


RMB 


1 


Punto-Ruptura-Siguiente 


a Jin A 

CMDG 


PSHS 


A 


Guarda A por si real iza mos un 
retcrno normal 




LDA 


NBCTBP.PCR 


Punto-Ruptura-Siguiente 


tf04 


BLE 


ENDF04 


Si Punto-Ruptura-Sigu1ente>0 




CMPA 


MAXBP.PCR 


y<=16 




BGT 


ENDF04 


(num. max. de puntos ruptura) 




DECA 




Conv.endesplaz, paratabla 




LEAX 


BPTAB, PCR 


Dir. deTabla-Puntos-Rupt. 




LEAY 


REMTAB, PCR 


Dir. de Valores-Sustit. 




LDB . 


A,Y 


TomaValor-Sustituido 




LSLA 




Convierte A en desplazamiento 
paratablade16bits 




STB 


[A,X] 


Lc almacena en la direction 
dentro de Tabla-Puntos-Ruptura 




LDS 


STACKP.PCR 


Coloca Puntero-Pila en S 




DEC 


10,'S 


Ajusta valor del PC en pi la 




INC 


NEXTBP.PCR 


Increments Punto-Rupt.-Sig. 




RTI 




Return desde la interruption 


ENDF04 


PULS 


A P PC 


Restaura y retoma 
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Software/Starfinder 



Estrellas en pantalla 



bntlo de 



: -zzi cades de 
i ite Starfinder 
jn panorama del cielo 
fo circular, segun la 
i :i , ::- =ea Horizontal o 
Li escerta estelar se 
r para un punto de 
en cualquier lugar 
Idede laTierra, en 
icmento durante el 
visual izaci 6 ri se 
scai estrellas o 
terminados, como el 



"Starfinder", escrito para el 
BBC Micrrir, es un paquefe 
educative dtsenado 
especialmente para astronomos 
"amateurs" 



Los astronomos sieinpre se han encontrado con un 
problema en particular: el del tiempo atmosferico. 
Para los astronomos profesionales es un hecho 
comun pasarse semanas preparandose para un 
aconteeimiento particulannente asombroso, solo 
para descubrir que una densa nube oscurece la vi- 
sion, Este es el motivo por el cual en la actualidad 
la mayoria de los observatorios se eonstruyen a 
gran altitud, en lugares donde exista poca nubosi- 
dad, o incluso en el espacio. 

Ahora Century Software ha traido el universo 
hasta la pequena pantalla a traves de Starfinder, un 
paquete que con tie ne software en cassette y un 
libro; En esencia, el programa le permite al usuario 




Vista vertical 



Vista horizontal 



contemplar cualquier section del cielo de cualquier 
lugar del mundo en cualquier momento del s, xx< 
Una vez que se ha cargado el programa desde la 
cassette, se le ofrece al usuario una lista de opcio- 
nes. Una de ellas es observar el cielo en ese mo- 
mento; la vista por defecto es la del cielo tal como 
se veia mirando hacia el sur desde Londres en la 
medianoche (hora del meridiano de Greenwich) 
del 21 de noviembre de 1984. Esto parece ser pura- 
mente arbitrario , ya que el panorama que ofrecia el 
cielo en esa fecha no tenia nada de especial: es pro- 
bable que esto se haya disenado asi para coincidir 
con la fecha del lanzamiento del paquete y no con 
ningun acontecimiento cosmico especifico. 

En la parte superior de la pantalla el programa 
visualiza la hora y la fecha, y da la situacion del 



obscrvador en termmos de longitud y latitud. De- 
bajo de esta information esta la carta cstelar pro- 
piamente dicha, que muestra el cielo nocturno de 
suroeste a sureste, con una altitud (el angulo dc 
vista) de 60°. Al programa le lleva algunos segun- 
dos visualizar las estrellas, pucsto que para proce- 
sar y trazar cada uno de los cuerpos celestes se re- 
quiere gran cantidad de calculos nurnericos. 

Las estrellas se representan como cuadrados 
blancos (el programa se ejecuta en la modalidad 4) 
y las estrellas mas brillantes se indican con un 
mayor tamano. Es una verdadera lastima que las 
maquinas Acorn no posean una instruction de "bri- 
Uo", loque harfa mas realista la visualization. Los 
planetas tambien tienen forma cuadrada, pero 
estan trazados en rojo, mientras que el Sol se repre- 
senta mediante un gran cuadrado amarsllo y la 
Luna por medio de un pequerio punto amarillo. 
Utilizando la "sonda espatiar, que se mueve pul- 
sando las teclas para el cursor, se puede identificar 
cualquiera de las estrellas reflejadas. Cuando se co- 
loca la sonda espacial {una cruv roja) sobre una es- 
frella, apareee arriba del mapa el nombre cientifico 
y el nombre corrierfte de esa estrella, asi como sus 
coordenadas, dadas como una cifra de altitud y de 
acimut (la altitud se expresa como una cifra positiva 
o negativa, con el horizon te como cero; el acimut 
indica los grados este u oeste proa al norte). EI pa- 
norama se puede cambiar desde ei teclado modifi- 
cando cualquiera de est as cifras. 

Regresando al menu principal, el usuario puede 
modificar la vista para que corresponda a la que se 
observo en cualquier momento en cualquier lugar 
del mundo. EI programa tambien se puede utilizar 
para encontrar un cuerpo celeste deiermmado: una 
^estrella, un planeta o el cometa Halley. 

A pesar de que este paquete es muy amplio, 
tiene sus limitaciones. La principal de ellas es la 
cantidad de estrellas que se pueden visualizar. El 
program ador, Ronald Alpiar, ha opiado por incluir 
estrellas de magnitud 4 o inferior (la "magnitud" es 
el nivel de brillo de una estrelia, representando una 
magnitud alta a una estrella debit)- A simple vista 
el ojo humano puede distinguir cuerpos celestes de 
magnitud 6, de modo que el programa no intenta 
mostrar todas las estrellas que podria ver una per- 
sona en una noche clara. 

El libro que se incluye con el programa analiza 
los diferentes tipos de telescopios e informa de las 
mejores horas para observar los astros. 



Starfinder: Para el BBC Micro y el Electron 
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Autores: Heather Couper (el libro), Ronald Alpiar 
(el programa) 
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Robotica/Aplicaciones 




El nombre del robot 

Examinemos algunos de los productos que se venden 
comercialmente bajo la denominacion de robot 



Hasta ahora eo m±esua serie sofore Robotica nos 
hemos ocupado timdamemalmente de considera- 
ciones teoricas relaovas al diseno y el funciopa- 
miento de los robots. Ed la practica, no se han im- 
plementado muchos de los conceptos que hemos 
analizado. o se los ha limitado debido a una cierta 
falta de componentes mecanicos y/o de software in- 
teligente. Los robots actuates, ya sea los destinados 
al uso doroestko o al uso industrial, tietiden a que- 
darse cortos en relation a lo que hemos llegado a 
espeiar tie eflos con el paso de los anos. Existen 
r dotar al robot de vista, oido y tacto, 
z--:: . ^ "sensaciones" que este experiment a no >ig- 
nifican nada para el, y no se las puede sintetizar 
para estimularlo hacia un comport am iento original, 
no programado, Robbie el Robot y sus otros com- 
paneros de ficcion todavia estan muy lejos de ha- 
cerse realidad. 

No obstante, en la actualidad se estan vendiendo 
muchos productos bajo la denominacion comun de 
robot. Estos van desde pequenos y baratos juguetes 
hasta el sorlsticado R2D2 y robots industrial es su- 
mamente costosos. Despues de haber examinado 
los componentes del diseno de robots y los aspectos 
te6ricos, debemos ahora considerar que constituye 



un autentico robot. No hemos de ser demasiado 
exigentes, pero estamos en condiciones de reunir 
todo cuanto sabemos y aplicar estos conocimientos 
para elaborar una definition funcional 

La primera consideration, que viene a eliminar 
muchos de los productos "robot" de precio mas re- 
ducido, es el movimiento: ^puede el robot despla- 
zarse solo a traves de un espacio? No podemos es- 
perar que el robot se programe a si mismo, ni que 
establezca un curso dc action sin la guia del hom- 
bre; pero si podemos esperar que, una vez puesto 
en movimiento, sea capaz de operar con indepen- 
dencia del control humano continuo. Sin esta liber- 
tad de movimiento no se puede considerar que un 
objeto sea un robot. 

Habiendo superado la prueba del movimiento, 
nuestro candidate a robot debe evaluarse sobre la 
base de como se efectua la action. A un pequeno 
coche de juguete se Ie puede instalar un motor y 
unas pilas que lo mantengan en movimiento si- 
^uiendo una linea recta, Agreguele parachoques y 
el coche podra desviarse apartandose de obstaculos 
tales como paredes y mesas. Pongale al coche un 
centro de gravedad ligeramente inusual y grandes 
neumaticos de goma y podra incluso ascender por 



Tres en el laberinto 




r r 1 — ^ 



Robot 

Alimentado y controlado desde 
su ordenador mad re, el robot 
esta equipado con sen so res 
sens! hies a! tacto y a la luz 




Big Irak 

Este dispositive activado por 
mlcroprocesador se puede 
programar a traves de su teclado 
con instrucciones de distancia y 
direccibn similares a las- del 

LOGO 



Coche con parachoques 

Este juguete a pilas avanzara en 
tfnsa recta hasta chocar contra 
algun objeto r en cuyo caso su 
trayectoria variara sinrumbo fjjo 



Pistas sorpf endentes 

Los tres dispositivos estan 
intentando recorrer un laberinto: 
el coche de juguete simplemente 
avanzatropezando de pared en 
pared, el Big Trak siguelas 
instrucciones que ha 
programado su operador 
humano para superar e! 
laberinto, mientras que nuestro 
robot se aprende el laberinto a 
traves de la interaction de su 
software y sus sensores. A I 
final, el robot conseguira 
resolverel laberinto, 
fndependientemente de lo que 
suceda; el Big Trak seguira su 
programa, de modo que, en 
caso de que las directrices del 
operador sean correctas, podra 
superario; el coche de juguete 
solo podria resolver laberintos 
"diestros" y, aun ass, serfa por 
casualidad. Cuando el coche 
choca con el Big Trak, el hecho . 
no lo atecta, puesto que su 
comportamiento no tlene ningun 
propositi) determinado; el Big 
Trak, sin embargo, sufrira una 
desviacitin de90°en su 
recorrido (senalado en color 
verde} pero seguira girando y 
avanzando como si aun 
estuviera en su cams no 
(senalado en rojo). Am bos 
dispositivos no reaccionan de 
forma " Intel igente 1 ' ante este 
acontecimiento imprevisto; ante 
esta situation, el robot se 
comportana como si se tratara 
de un aspecto mas de un 
entorno imprevisible 
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una pared y darse la vuetta, siguiendo luego en otra 
direction. EI coche se mueve por si mismo y es in- 
dependiente de todo control humano, pero ^se 
puede decir que sea un autentico robot? La res- 
puesta, bastante evidente, es "No", pero para nues- 
tro estudio sobre los robots es de fundamental im- 
portantia emender por que esto es asi. 

El movimiento del robot, como ya hemos visto, 
se divide en dos categorias: movimiento simple 
bajo el control de un programa, y movimiento inte- 
Jigente, En ambos casos la clave es la programa- 
cion. Nuestro coche activado por motor no puede 
ser un robot porque no se lo puede programar para 
que se mueva de diversas formas. Posee un patron 
de operaciones establecido incorporado en el meca- 
nicamente, pero no puede responder a instmccio- 
nes humanas y no posee medio afguno en virtud del 
cual un controlador humano pueda generar un mo- 
vimiento alternative. Una interesante variation en 
este sentido es el coche, autocamion u otro objeto 
activados por motor que se pueda programar perfo- 



rando un patron en una ficha. La ficha se lee meca- 
nicamente y el coche sigue el patr6n girando hacia 
la izquierda o la derecha y siguiendo hacia adelante 
de acuerdo a las instrucciones de la ficha. Segun 
nuestra definition, este tipo de coche si seria un 
robot, porque puede ser programado con el softwa- 
re de ficha perforada. La necesidad de un movi- 
miento programable elimina a muchos orros pro- 
ductos pequenos y baratos etiquetados bajo el de- 
nominador comun de "robot". 

Se pueden aplicar otras varias consideraciones, 
^Posee e! objeto sensores que le den una entrada 
proveniente del mundo exterior? ^Esta capacitado 
para responder a su entorno y crear un modelo in- 
terno cambiante? ^Puede jugar una partida de aje- 
drez? A nuestro robot se le podria aplicar cualquie- 
ra de estos criterios, pero, en el analisis final, el 
elemento del movimiento programable es esentiaL 

Los siguientes productos, todos ellos vendidos 
como robots, se pueden adquirii en los comercios 
especializados. 




NOMBRE: Beasiy 
TIPO: Brazo- robot 
PROGRAMABLE: Sf 
PROViSTO DE SOFTWARE: Si 

REALIMENTACION SENSORIAL: Rea I i mentation posicional 

DISTRI8UID0RES: Commotion Ltd, 241 Green Street, Enfield, 
Middlesex EN3 7SJ, Gran Bretaria 

Recibe sus instrucciones desde la puerta para el 
usuario del BBC Micro y se alimenta a parti r de la 
fuente electrica auxiliar del ordenador, Se surninistra 
en forma de modelo para armar e incluye tres 
servomotores. Tambien se acompana de dos 
manuales, un foileto de construccidn y un manual de 
operaciones, El robot I leva incorporado su propio 
sistema operative (Robol) que permite que el usuario 
mueva cada uno de los servomotores de lorma 
independiente. 





NOMBRE: Hebotll 
TIPO: Robot mtivil 
PROGRAMABLE: Si 
PROVISTO DE SOFTWARE; Si 
REALIMENTACION SENSORIAL: Tacti I 
DISTHIBUfDORES: Powertran Gybernetios Ltd, West Portway 
Industrial Estate, Andover, Hampshire, SP103NN, Gran Bretaria 

Es una tortuga-robot accionada por dos motores CD 
conectados a dos ruedas. La tortuga se conecta en 
interface aJ conector marginal del Sinclair ZX81 , si bien 
los fabricantes aseguran que, medtante la reconexion 
de algunos cables, se puede hacer que funcione en 
cualquier micro personal, Viene en forma de modelo 
para armar con un foileto de construction. La tortuga ' 
posee un iapiz retractil y cuatra detectores de colisidn 
que proporcionan realimentacion tactiL El suministro 
elGctrico le llega desde el ordenador. 



B8E: Memocon Crawler 
: Robot movil 
:Si* 

) DE SOFTWARE: No 



:c.ns House, 18-29 Mora 

ax 3e «£ ga~£ Pnsn Movits. 
ob Anen&r tios motores 
iscefectearedentBunacaia 



. un zumbador y LED (diodos emisores de 

i tambien se pueden contra lar desde el 




MHE: BSC Buggy 
TTP0: Robot movil 
PROGRAMABLE; Si 
PROVISTO BE SOFTWARE: Si 

REALIMENTACION SENSORIAL: Sensor luminoso, dispositivos de 
p res ion 

DftTRfBUIDORES: Economatics Education Ltd, Epic House, 9 
Org reave Road, Handsworth, Sheffield, Gran Bretana 

Esuna tortuga controlada mediante software. Viene en 
forma de modelo para armar y se opera desde la puerta 
: i iz jsuario del BBC Micro, con potencia 
provenrente de la fuente de altmentacion auxifiar del 
ordenador. Utiliza un par de motores paso a paso que 
le proporcionan un movimiento de gran precision, 
Puede responder a una fuente luminosa, buscarla y 
eneontrarla; se le pueden instalar un lapiz y un lector 
decddigode barras. 



NOMBRE: Valiant Turtle 
TIPO: Robot movil 
PRDGRAMABLE: Si 
PROVISTO DE SOFTWARE: Si 
REAUMENTACION SENSORIAL: Posicional 
DISTRIBUIDORES: Valiant Designs, 1st Floor, Park House, 
Battersea Park Road, London, SW11 , Gran Bretana 

Tiene reatmente forma de tortuga. Esta activado 
mediante un par de motores: cada uno le proporciona 
poteficia a una unica rueda. El dispositivo se controla 
desde el ordenador mediante un haz infrarrojo. El 
software que se surninistra con el dispositivo esta 
disenado para ejecutarse mediante logo, si bien 
funcionara igualmente sin el tenguaje de instrucciones. 
La potencia se la suministra una pila reeargaole 
ineorporadaen el aparato. Tiene un portalapiz que le 
permite trazar disenos mientras avanza. 



N0MBR£: Edinburgh Turtle 
TIPO: Robot movil 
PRQGEAMABLE: Si 
PROVISTO DE SOFTWARE: Si 
REALIMEKTACION SENSORIAL: Posicional 
DISTRIBUIDORES: Jessop Acoustics, Unit 5, 7 Long Street, 
London, E2 t Gran Bretana 

A esta tortuga se le ha dado el nombre de Edinburgh en 
honor a la ciudad en la cual se desarrollb. La 
Edinburgh Turtle se conecta a! ordenador mediante un 
cable piano, desde donde tambien obtiene su potencia. 
La activan un par de motores electricos CD; cada uno 
aiimenta a una sola rueda. Esta equipada con un 
portalapiz retract!! y un altavoz incorporado, Lafirma 
fabricante acaba de intraducir una version a control 
remoto. 



Software/TKISolver 



Conjetura exacta 

Concluiremos el estudio del £ TK!Solver" con un detenido analisis 
de algunas de sus caracterrsticas exclusivas 



Tal como explicabamos en el capitulo anterior, 
TKlSolver es un paquete de software de la "proxi- 
ma generation" que introduce el concepto de hoja 
electronica en el reino de las matematicas y la inge- 
nieria de nivel superior. Ya hemos visto que el pro- 
grama perm it e que el usuario defina variables con 
nombres y utilice las mismas en ecuaciones mate- 
maticas complejas, En este capitulo, el ultimo de 
nuestra serie sobre hojas electronicas, analizamos 
con todo detalle la inusual capacidad del TK! para 
iterar. Este es un metodo en virtud del cual el pro- 
grama puede resolver una variable haciendo supO- 
siciones respecto a la misma. Normalmente, cuan- 
do se trabaja con ecuaciones, uno puede determi- 
nar los valores de todas las variables si desde el co- 
mienzo se cuenta con la information suficiente. El 
programa sentillamente reduce el program a a una 
serie de calculos. Por ejempio: 

A 2 +B 2 =2C0S Y 

Cualquiera de estas tres variables se puede resolver 
fatilmente si se conocen los otros dos valores. En- 
frentado a esta ecuaci6n (y proportion an dole valo- 
res para A y B), el Direct Solver (solution ador direc- 
to) del TK! He vara a cabo los calculos requeridos y 
producira un valor para Y, 

Pero existen ocasiones en las cuales la determina- 
tion de un valor no es directa. La ecuation redun- 
dante, que define a una variable en terminos de se 
misma, constituye uno de tales cases. Por ejempio. 
tomemos: 

D=(A+B)/{2*D) 

en un modelo en el cual el unico valor conocido es 
A, Se pueden plantear otros problemas a conse- 
cuencia de un modelo incomplete, o de un modelo 
con muchas variables uidependient.es y una canti- 
dad limit ad a de datos. El concepto de iteration es 
dificil, de modo que Tomemos un ejempio de itera- 
tion que sea mas practico. 

Volvamos a considerar el modelo del viaje en 
coche que creamos en el capitulo anterior y agre- 
guemos unos pocos detalles para hacerlo mas apli- 
cable. Como recordara, el modelo previo se cons- 
truyo alrededor de cinco valores: distancia, tiempo, 
velocidad, gasolina y gastosviaje. Podria calcular 
los gastos del viaje, disponiendo de la velocidad y el 
consumo de gasolina; la distancia, a partir de la ve- 
locidad y el tiempo, y algunas otras variaciones sen- 
cillas. Pero ^y si ahora quisle ram os determinar a 
que velocidad deberiamos via jar para poder com- 
pletar el viaje con un presupuesto dado? 

En primer lugar, debemos anadir varios factores 
a nuestro modelo. Por ejempio, el modelo deberia 
tener en cuenta la potencia del vehiculo, la friction 
interna del motor y la resistencia del viento, todos 
los cuales producen un efecto en los gastos dc viaje 
y la velocidad del vehiculo. (Supondremos que la 



friction interna es constante.) Asimismo, debemos 
frjar un limite maximo para nuestro presupuesto y 
el costo del combustible que se este consumiendo. 

Se comienza a construir el verdadero modelo en- 
trando estas ecuaciones en la hoja Rule, una eola- 
tion en cada Knea. Estas ecuaciones se leen en la 
hoja Variable de forma automatics. Al haber varias 

ConstrocGibn de ecuaciones 




variables, la pant all a queda demasido pequena 
para contener toda la information. Para ver visuali- 
zadas todas las variables, podemos hacer que la 
hoja Variable aparezca sola en una ventana* Esto 
lo comeguimos pulsando la lecla del punto y coma 
(;) para trasladar al cursor hasta la ventana de va- 
riables, y digitando luego W1 . Ahora se pueden vcr 
todas las variables y podemos comenzar a entrar 
valores para el las. 

Solution directa 

El modelo se puede resolver directamente si al 
principio se le suministra information suficiente. 



Entrada lie valores para el Direct Solver 





Por ejemplo, si entra los si^uientes valores en la 
ooJumna INPUT: 5000 a DISTANCE 45 a VELOCIDAD, 
1-5 a PRECIO, .75 a FRfCCION y ,0000085 a VIENTG. y 
despues pulsa ! para llevar a cabo los calculos, TK! 



Resultados del Direct Solver 




dcmwuiiJ os apareceran en la columna OUTPUT. 

EBo dos proporaooa un daro anahsts de toda la 
information que deseamas. Penx £j si desearamos 
utilizar este modelo para resolver un problema ha- 
bkndo dado desde el comienzo menos informa- 
tion? Tomemos un calculo en el cual te nemos un 
presupuesto maximo dc 50 libras para gastar en ga- 
solina en un viaje dc 1 000 millas. Sabemos el pre- 
tio de la gasolina (1.75 libras el galon), de modo 
que podemos determinar cuanto podemos gastar 
por milla. Sena mas dificil, sin embargo, determi- 
nar a que velocidad debemos viajar para compietar 
el record do sin pasarnos del presupuesto. 

Empezamos por poner a cero los valores que ya 
habiamos entrado. Esto lo hacemos digit ando RVY 
(de Reset Variables Yes: poncr variables a cero si). 
Luego en tram os la informacion que ya conocemos: 
1000 para distancia, 50 para costo, y 1.75 libras 
para precio. Utilizamos un valor de 1/3 para la fric- 
tion interna (que TK! redondea a 0.333333) y 
0L0000095 para la resistencia del viento. Pulse ! 




para calcular, y apareceran los valores correspon- 
dientes. Podra observar que no se genera ningun 
valor para velocidad, tiempo y potencia, y la veloci- 
dad es el valor espetifico que necesitamos. Si pasa- 
rnos la visualization de la hoja Variable a la hoja 
Rule, veremos que tres de nuestras ccuaciones 



Ecuaciones no satisfechas 




estan sin satisfacer (lo que se indica mediante el * 
de la columna Status). 

Solucionador iterativo 

Dado que no podemos resolver el modelo utihzan- 
do el Direct Solver, debemos probar con el Iterative 
Solver (solucionador iterativo). Este toma un valor 
initial, entrado a modo de conjetura o hipdtesis, y 
lo aeomoda en la ecuation. Si el valor no es correc- 
ts el TK'Solver emplea una serie de aproximacio- 
nes sucesivas para determinar con precision el valor 
exacto. 

Lo primero que debemos hacer es tomar el valor 
de gastos de viaje generado prevtamente y trasla- 
darlo a la columna INPUT para suministrarle a TK! 
un valor extra con el cual comenzar. Esto lo hace- 
mos digitando I en la columna Status junto a gastos 
de viaje en la hoja Variable, Luego estimamos un 
valor para velocidad (50, p. ej.); entre este numero 
en la columna Input, digite G de guess (conjetura) 
en la columna Status y pulse ! para calcular* TK! 



Valores iterados 




visualiza Iterative Solver en la parte superior de la 
pantalla y un contador de cada aproximation. Al 
cuarto intento, TK! obtiene el valor correcto para 
velocidad, tiempo y potencia. 

Segun el program a, se necesita una velocidad 
promedio de poco mas de 47 millas por horas para 
compietar el viaje con el presupuesto fijado. Cuan- 
to mas proxima sea la conjetura al valor verdadero, 
mas pronto hallara TK! la solution. 



Programacion/Juego de aventuras 



Orden cumplida 



En este capftulo veremos 
como nuestro proyecto de 
programacion analiza y 
obedece las instrucciones 
que le imparte el jugador 



Banderas a cuadros 



Las banderas (o flags o 
indicadores) sonde uso 
corny n en aquellos programas 
que poseen una construccibn 
modular, Dentro de un 
modulo se pueden comprobar 
fas condicEones que implican 
una bifurcation en el control 
del programa, pero la 
bifurcation que pueda 
producirse a raiz del resultado 
de dlcha condition se puede 
demorar nasta que se real ice 
un retornc a la section del 
prog ram a principal. El 
estabiecim lento de una 
variable en un valor 
preestablecido cuando se 
efectua [a comprobacitin, nos 
permits que el valor de la 
variable se pueda comprobar 
mas tarde dentro de la seccibn 
del pro grama principal Las 
variables que se emplean de 
esta man era para senalar 
condiciones se denominan 
flags (o banderas o 
indicadores). Eldiagramade 
flujo muestra el bucle 
principal del programa de El 
bosQue encantado, tal como 
lo tenemos construido hasta 
el momento. La bandera F 
indica si una instruccidn tierce 
un formato valido o no, y se 
establece durante la subrutina 
de "descomposici6n de 
Instrucciones". La subrutina 
uttlizada para identificary 
ejecutar instrucciones 
normales em plea dos 
banderas: VF para indicar que 
la parte del verbo de la 
instrucritin se ha reconocido 
corTectamente. St a I ejecutar 
una instruction el jugador se 
riespiaza hasta un escenario 
-_f : z hecho de que se ha 
Elected o un des plaza miento 

■ : ca mediante MF, 
Cuando se comprueba MF 
dentro del bucle principal del 
: :: i~i j r /alor de 1 
tocScaqoeei bucle hade 
bftrartiaciaatJBs para 
describir ef nuevo escenario 
fiasta el cuaf se na desplazado 
el jugador 



ENTRADA 



Describir escenario 
actual y salidas 



Entrar instruction 



Descomponer 
instruction 




Identificar instr. 
y ejecutarla 




Emitir 
mensajc error 



Las aventuras por lo general se construyen de 
modo tal que el jugador pueda desplazarse de un 
escenario a otro, recogiendo o abandonando obje- 
tos a lo largo del camino. Para llevar a cabo estas 
tareas hemos cmplcado estas instrucciones: 



AVANZAR 


Para desplazarse por los escenarios 


REGOGER (objeto) 


Para coger un objeto 


DEJAR (objeto) 


Para deshacerse de un objeto 


LI STAR 


Para hacer una lista de objetos 


MIRAR 


Para volver a visualizar la description 
del escenario actual 


FIN 


Para dar por finalizado el juego 



Tambien se podria disponer de variantes de estas 
instrucciones, tales como IR en vez de AVANZAR, o 
TOMAR en vez de RECQGER. Parte de la diversion 
que ofrece un juego de aventuras es determinar 
cuales son las paiabras que aceptara el juego. Por 
ejemplo, un jugador podria probar con la instruc- 
tion NADAR estando en un escenario seco. Si el pro- 
grama responde diciendole al jugador que no 
puede nadar aqui, el jugador podria logicamente 
suponer que existen escenarios en los cuales si esta 
permitido nadar. (Tambien existe la posibilidad de 
que el programador quiera inducir al jugador a 
pensar que jefectivamente es asf!) 

La cantidad de instrucciones que acepta un juego 
varia a tenor de la complejidad del juego y de la 
cantidad de esfuerzo que ha invertido el programa- 
dor para prever cualquier posible eventualidad, Al 
crear e! programa es esencial que el disenador se 
asegure de que el programa no se interrumpa si el 
jugador trata de entrar una instruction que no se 
hay a previsto, Todo lo que se requiere es una ruti- 
na de autoproteccion que im prima "No compren- 
do'% teniendo presente que el programa debe po- 
seer la flexibilidad suftcientc para que los jugadores 
puedan entrar instrucciones de diferentes formas. 
Por ejemplo, seria muy molesto que un programa 
aceptara la instructi6n TOMAR LAMPARA y respon- 
diera a la instruccion TOMAR LA LAMPARA con un 
"No comprendo". La incorporation de flexibilidad 
la analizaremos con mayor prof undid ad mas ade- 
lante. Por el momento, hemos de considcrar la 
clase de instrucciones que se podran impartir du- 
rante el juego e idear una rutina que descomponga 
las mismas de modo tal que puedan ser interpreta- 
das facilmente. 

Descomponer instrucciones 

Independientemente de lo que signiftque la instruc- 
cion, es muy probable que este construida en modo 
imperative), como, por ejemplo, AVANZAR SUR 
I HACIA EL RIO o MATAR AL EXTRATERRESTRE. La 
ventaja de esta estructura de orati6n cs que es facil 
de descomponer: el verbo siempre ocupa el primer 
lugar de la oration, seguido por el objeto del verbo 
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. en ultimo lugar, puede haber una cualificacion 
de la action. La primer a etapa del analisis de una 
instruction consiste en separar el verbo del resto de 
la frase, Esta tarea se puede realizar facilmente ex- 
plorando la oration caracter a caracter, utilizando 
M!D$. hasta hailar un espacio. La parte de la frase 
que se halJa a la izquierda del espacio es el verbo , y 
- - i- .: r . " ,ble VBS. La parte de la 

---± - -1-11 irrecha puede serasignada a 
."- i_E " -'-^ -: Esta subrutina se utiliza 
£ : " ■-■-.= mDoatadn para descomponer la ins- 
mxxxm contenida en la variable IS$: 



2570 
2575 
2520 
2530 
2540 
2550 
2560 
2570 



2600 



33" 



SB DESG0MPOWER INSTRUCCION "** 
f 5S="USTAR* m ISS="flN n THEN VB$=ISS:F- 1: RETURN 
EF rSS= * mmC THEN VB5= JSS:F= 1;RETURN 
F=0 

LS=IEN(1SS) 

F0RC=iT0 LS 

AS=MIDS(ISS.CJ) 

IFAS<>" n THEN 2590 

VBS^LEFT$(JS5.C-1):F=1 

NNS=RIGHTS(IS$.LS-C]:C=L5 

z-. = - =r = , k 

r= s - ^z^-D%«EWSD0SPAUBIttS- 




descompooer la ora- 
: la instracooG no sea nin- 
gnua dc las tres iastraodoaes posbfes compuesxas 
por una sola palabra. es dear. USTAR, MIRAR o FIN. 
Si se trata de una instruction de una sola palabra. 
toda ella es asignada a V8S y se sale de la rutina. Si 
k instruction no es ninguna de estas tres, enionces 
la rutina se introduce en un bucle FOR.., NEXT y eo- 
mienza a explorar en busca del primer espacio. En 
este bucle se utilizan dos tecnicas que merecen una 
mention especial Ambas estan relacionadas con el 
hecho de que efectuar un salto conditional para 
salir fuera de un bucle FOR.. ..NEXT sin pasar por la 
sentencia NEXT es un estilo de program acion suma- 
mente malo, En cambio, para sefialar que se ha sa- 
tisfecho alguna condition (en este caso, que se ha 
encontrado un espacio) se establece un flag o indi- 
cador, F, en uno. En segundo lugar, cuando se ha 
hall ado el primer espacio, es una perdida de tiempo 
seguir explorando el resto de la frase, 

El bucle se puede terminar limpiamente en este 
pooio establetiendo el contador del bucle, C, en su 
aopehor- LC. Por consiguiente, cuando el 
wdi I ~- Ipppi a NEXT, pasara a la ins- 
- - z- ver zt silxar otra vez hacia 
i h rrii" aria FOR. Una wz tenamado co- 
; el bocie. se pwede oomproter d estado 
dsL Mfiretar £ Un vaior de dbo en ei zndkador 
signiSca que la frase esta compoe sta por mas de 
una palabra, y todo oianto resta por faacer en esta 
etapa es retomar al bucle principal. Si ei indkador 
no es uno ? entonces la instruction solo posee una 
palabra y no es ninguna de las instrucciones de una 
sola palabra comprobadas previamente. En este 
caso, antes de retornar en busca de otra instruc- 
tion, se imprime un mensaje que senala que se re- 
quieren dos palabras. 

Instrucciones normales 

En la mayor parte del programs el jugador sencilla- 
mente se trasladara de un escenario a otro y recoge- 
ra o abandonara los objetos que pueda haber en- 
contrado, Por consiguiente, para la mayoria de los 
escenarios, las instrucciones AVANZAR, REC0GFR, 
DEJAR, USTAR, MIRAR, FIN (y sus variantes) son su- 
ficientes para permitir que el jugador realice esto. 




Solo en circunstantias inusuales el jugador deseara 
utilizar otras instrucciones mas especializadas. Por 
ejemplo, no tiene mayor sentido emplear la instruc- 
cion MATAR si no hay nada que poder matar. No 
obstante ? es posible idear una estructura de progra- 
ma en la cual, en la mayor parte de las ocasiones, 
solo se comprueben las seis instrucciones retativas a 
movimiento y objetos. Cuando el jugador entra en 
un nuevo escenario, el programs puede verificar si 
se trata de uno que, por algun motivo, se haya se- 
nalado como "especial". Si fueTa este el caso, en- 
tonces cualquier nuevo requisito para instrucciones 
se puede tratar mediante una subrutina de instruc- 
ciones especifica para ese escenario en particular. 
Por lo tanto, el bucle principal de llamada de nues- 
tro programa deberia hacer lo siguiente; 

1) Describir ei escenario y listar las salidas. 

2) Determinar si 6ste es "especial". 

3) Solicitar una instruccion y, si aquel no es espe- 
cial, expiorar la lista de instrucciones normales. 

En el bucle principal ha de haber, asimismo, una 
facilidad para distinguir entre una instrucci6n que 
produce un desplazamiento a un escenario nuevo y 
que no p::iuz;-. Er. t. primer casOj d bode 
oecesdia \x)iver atras hasta el comienzo del bucle. 
para describir el nuevo escenario y detidk si es o no 
especial. En el segundo caso. solo es necesario sal- 
tar hatia atras para solicitar una nueva instruccion. 
La forma mas simple de Implementar esto consiste 
en utilizar un "indicador de movimiento", MF, que 
normalmente esta establecido en cero. Si una ins- 
truction implica movimiento, entonces este indica- 
dor se establece en uno + El estado de MF se puede 
comprobar al final del bucle principal, efectuando 
el sal to adecuado. Agreguele a El bosque encanta- 
do las siguientes lineas: 

270 60SUB2500:REM 0ESCOMP0UER INSTRUCCI0W 
275 IF F-D THEN 260: REM INSTRUCCION NO VALJDA 
280 GOSUB^OOO REM IHSTR JCCI0NES NORMALES 
230 IF VF=0 THE NPR I NT: PR I NT" NO COMPRENDO" 
300 IF MF=1 THEN 2^0:REM NUEVO ESCENARIO 
310 IF MF=0THEN 260: REM NUEVA INSTRUCCION 

3000 REM "*** S/R INSTRUCCIONES NORMALES **** 
3010 VF=0: REM INUfCADOR VERBO 

302O IF VBS="AVANZAR" OR VBS=" IR" THEN VF^1;GOSUB3500 
3030 IF VBS= REC0GER" OR VB$="T0MAR"THEN VF=1:GOSUB3700 
3D40 IF V8S=' H DL r JAR" OR VB£= "PONER"THEN VF= 1 :GOSUB3900 
3050 IF V6S— "LISTAR" OR VBS= "INVENTARI0" THEN VF-1 GOSUB4100 
3QS5 IF m= "MIRAR" THEN VF=1:MF=1 RETURN 
3050 1FVBS=-F1N' OR VBS-" TERMINAR" THEN Vf =1 :G0SUB4170 
3070 RETURN 

En la primera rutina se utiliza otro kidicador. VF. 
r _' i indkar si el verbo se ha entendido \ - obedecido 
o do* VF se esiabkoe en uno solo cuando se ha aisla- 
do al verbo. En el bucle principal podemos insertar 
una sentencia "No comprendo" de autoprotection, 
comprobando el estado de VF, Si VF permaneee en 
cero. entonces la rutina de analisis no ha reconoci- 
do el verbo y se visualiza la sentencia- 

En el proximo capitulo del proyecto nos ocupa- 
remos de las subrutinas para recoger, abandonar y 
listar objetos, De momento, podemos agregarle a 
nuestro grupo de instrucciones normales una corta 
subrutina de instruction FIN; 

4170 REM *"* S/R FIN DEL JUEGO **" 

4130 PRINT:PRINT-ESTASSEGURO (S/N) ?" 

4190 GETA$:IFAS<> "S" AND AI<:>' L N" THEN 41 90 

420O IF AS= 'N ' THEN RETURN 

4210 END 

La instruction MIRAR tambien es directa. Para vol- 
ver a describir el escenario actual, simplemente 
hem os de establecer el "indicador de movimiento" ? 
MF, en uno, y retornar al bucle principal del progra- 
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ma. El establecimiento de MF hani que cl programa 
salte hacia atras hasta el principio, 11a man do por 
tanto a las rutinas que describen un escenario y sus 
salidas. Dado que el valor de la variable de escena- 
rio, P, no sufre ninguna alteration a causa de la 
instruction MIRAR, se describira el mismo escena- 
rio. Esta instruction es util si, despues de que el 
jugador haya Uevado a cabo una serie de action cs. 
ia descripcion original del escenario actual se hubie- 
ra desplazado fuera de la pantalla. 

Anadir flexibilidad 

Al impartir instrucciones de movimiento. el juga- 
dor puede digitar dife rentes form as de la misma 
instruction. Por ejemplo, AVANZAR NORTE, IR 
NORTE y AVANZAR HACIA EL NORTE estan solicitando 
lo mismo, A pesar de que no es de vital importan- 
cia que un programa de juego de aventuras reco- 
nozca todas estas formas, el hecho de que diversos 
formatos de instruction sean legates contribuye a 
dotar al juego de un mayor in teres. Las tres instruc- 
ciones de movimiento que acabamos de ofrecer po- 
seen una estructura eomun: todas empiezan con un 
verbo de movimiento y la direction requerida es 
una palabra discreta* Se puede , por consiguiente, 
disenar una rutina que busque la direction en la 
parte de 3a frase que viene despues del verbo. La 

Ustados 0/gitaya 

-gp^ PR)wrNKESITOALK£NOSDOS 

m°o vf=o*' " S/r/icc 'on£s mmm **■• 

1920 PRINT 

I as sr®% «^s"~'» J *»w 
it******* 



rutina explora esta zona de la oracion en busca de 
espacios, aislando cada palabra y comparandola 
eon las cuatro palabras de direction buscadas hasta 
hallar un emparejamiento. 

3630 REM S/Ft BUSCAR DfFECCION **** 
3&4Q NNS=NHi+- ":LN=LEN[NNJ):£>1 
3645 FOR 1 = 1 TO LN 

3650 IFMID$(NN$J,1)<>" " THEN NEXT kflETURN 

3655 WS=MIDS(NNS.Q.I-C):C~I+1 

36BD IF W$= M NORTE" OR W$="E$T£" THEN NNJ= W5:l = LN 

3665 IFWS-'SUR" OR W$-"0ESTE" THEN NNS-WSJ-LN 

3670 NEXT I 

3675 RETURN 

En el capitulo anterior del proyecto desarrollamos 
una rutina de movimiento. Para anadir esta nueva 
rutina a la de movimiento solo hemos de agregar Ia 
siguiente iinea: 

3505 GQSUB 3630 REM BUSCAR DIRECCION 

Vale la pena destacar que esta rutina no obedecera 
instrucciones tales como AVANZAR EN UNA DIREC- 
CION NORTENA, puesto que la rutina no puede aislar 
la palabra de direccion, Sena posible disenar una 
rutina que trabajara en funcion del principio de ex- 
plorar grupos de cuatro y cinco letras, comparand© 
cada grupo con las cuatro palabras de direccion po- 
sibles. Sin embargo, tal rutina tomaria mucho tiem- 
po de ejecucion, Por otra parte , nuestro programa 
si aceptara AVANZAR NORTENA, dado que la rutina 
de movimiento finalmente utiliza la primera letra 
de la segunda parte de la oration, NNS. En este 
caso, la N de MORTENA se aceptaria como si se trata- 
ra de la N de NORTE. 



Icomplemeirtos al basic | 

1790 LET ;M;!«g ^ BS-KPO MS-LB 

2580 (H^WI^gt RETURN 
3650 IF RS JO l)<> . UT c _|+1 

3655 LETWS-RS&VjS-S" AND 

2 6 30 REPEAT:A!=eETS-"NTILA$.-S- 
OR A$« N 

OR A$=' N 
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i Atencion a la corriente electrical: el la constituye "la trampa". El 
I i st ado de este interesante juego ha sido escrito para el Vic-20 



Juegos 




En este juego, usted se desplaza dentro de un rec- 
tangulo dejando una estela tras de si. El ordenador 
controla un robot que, al trasladarse de lugar, dcja 
asimismo un trazo a sus espaldas. Si usted toca los 
limites del rectangulo o si corta un trazo, se electro- 
cutara, 



Los puntos se cuentan de la manera siguiente: 
Si el robot se detiene (el circulo verde): 200 puntos; 
si usted pasa sobre un punto malva: 50 puntos; si 
usted pasa sobre un punto bianco: 10 puntos. 

La velocidad en la ejecucidn del juego aumenta 
en cada partida. 




K-J= ~Z2: FR.',T 3 l I" 
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15 X^RND(-71)-De?*n X = =&"^63- i = : 
20 0{0J-1 D{1)=22:D(2)=-1:Di3)=-22 
30 L=150+(KJS=MT50 

40 PP- 46 : PC= 437:0 P= 1 : DC =2:SC - 7580; GL - 384OfcP0KE36878.l5 

45 GOSUB1000 

50 IFKJS= < 'J"THEN62 

55 G ETAS: P0KE1 98,0 

GO ND=22"«A$= i, P")-(A$= "."))+[AS= "L")-fA*- ' :"):IFND<>0THENDP-ND 

61 G0T07Q 

62 SYS7600: X1 = 0: FOflX = OT03: X1 =X1-FNR fX):NEXT: I FX1 > 1 THE N 70 
65 N D = 22 * (FN R(Q) - FMR(1 ) - FN R(2 ) - FN R(3) : IFN DoOTH EN DP = N D 
70 NP-PP+0P:X1 = PEEK(SC+NP);IFXK>46THEH700 

75 P0KF.36874,128:S-S+10 

80 P0 KESC + PP, 1 60 : P0 KEC L+ PP, 2: P0KESC +NP,42;P0 KEC L+NP, 2: PP = NP 
85 PRINT M^IWM^^ PTS J ' S " ■ H ' ; : P0 KE36874 .0: POKE36876 , 0 

90 N C= PC+ D (DC) : IFPEE K (SC + NC)< > 460RRN D( 1 j < . 1 5THEN200 
100 POKESC + PC , 1 60:POKECL + PC , 5 : P0 KESC *NC,1 5-POKECL + NC. 5; PC - NC 
110 F0RX-0T0L:NEXT:G0T050 

200 F0RX= 1T019:DC=INT(RND(1 }M):IFPEEK(SC+PC+ D(OC))=46THENNC=PC+ DjDC):G0TD100 
210 NEXT 

220 S=S+200:L=L/2 

230 F0RX=1T04:FORY=128T0 1 60: POKE36875 ,Y: NEXT:NEXT: POKE36875 , 0: P0 KE1 98,Q:GOTO40 
700 I FX1 -81 THEN P0 KE36876, 200 : S - S + 50A:G 0T080 
800 POKE36877,250:F0RX= 1T02000: NEXT: P0KE3637 7,0 

810 FfilMT w i9P»3WraW(M!tt FINALlZADO " : FQ RX = 1 TO5O00 : NEXT: P0 KE1 98 , 0: S - 0: GO 

T010 



NEXT 

[BfTfR«O(1)"20K1J-22 
EXT:POKESC^46.46:POKESC~437,46 



- \ - — 

m F0RX=lTO5ai=«tf7(WC(1}-2 
KQO POKE768Q-Xi.1fiftf'OKE3M0O 
1040 F0RX-1AT5JC1=WT(RN0(1)'2! 
1050 POKE768Q-X1,81:POKE3&*00~ 
1060 POXECL-46 . 1 :P0 Kf C L— 437, 1 : 1 
2000 PQKE36S79.25 
2010 PRINTS 

2020 PR I NT" KH TRAM PA "DESPLACESE UT| U2AND0 LA PALANCA DE MAN DO 0" 
2030 PRINT" aPX»L+ OHLI 

2040 PR] NT" PTS- " : PR I NT" .-10 PTS™ PR I NTWfcp- 50 PTS" : PR] NT" KF ROBOT DETE MOO- 
TS" 

2960 PRJNTWULSE UNATECLA 

2970 GETAS:IFAS=""GOT02970 

2980 POKE36679,110:rFKJS<> '"TftENRETURN 

2990 PRJNT'3^!^^M1fQTECWD0 0 PALANCA DE MAMD0?* 

2991 GETC MS: IFCMS> > "C "AND CMS< >"M" THEN 299 1 

2992 RETURN 

3D0Q POKES 1 , 1 76 : PO K E52 . 29 : PO KE55 , 1 75: P0 KE56 , 29 
3010 F0RX= 7600T07861 :READA:POKEX,A:NEXT 
3020 RETURN 

3030 DATA169.Q, 141, 19, 145, 169, 127.141,34, 145, 173, 17. 145. 141 ,233. 29, 169. 4, 45,238, 
29 

3040 DATA141 .239,29,169,8,45,238,29.141 .240,29.109.16.45,238,29,141,241 ,29,189,32 
3050 DATA45,238,29, 141, 243. 29, 173, 32, 145, 41, 128.141, 242. 29.169. 255. 141, 34. 145, 96 
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Toque de distincion 

He aqui un dispositivo para disenar graficos que se destaca 
especialmente porque puede ser utilizado por la mayon'a de 
ordenadores personates 



El tec lido del Touch master 

La hoja que se proporciona con 
el software se encaja 
simplemente en la superficie de 
dibujo. La instruction se ejecuta 
en lapantallaal hacer presion 
sob re la instruccion apropLada 
en el lado derecho de la cubierta 
y mover el laprz, el punzon o el 
dedo hasta la superficie de 
dibujo 



Todos I os ordenadores de mayor venta en la actua- 
lidad ofrecen visualizaciones de graficos en alta re- 
soluci6n. Sin embargo, a menos que se disponga de 
software para graficos ya escrito. la creation de 
tales visualizaciones exige mucho tiempo y esfuerzo 
y muchas de las caractensticas no se utilizan al com- 
plete , Un programa para dibujar "bocetos" resulta 
insuficiente, porque a menudo el usuario desea co- 
piar en el ordenador una imagen ya existente en 
lugar de simplemente dibujar a mano alzada. 

Con esta finalidad se han comercializado varios 
digit alizadores, pero casi todos se han discnado bfi- 
sicamente para ser utifeados con maquinas cspeti- 
ficas, como el BBC Micro o ei ZX Spectrum. La 
tablilla para graficos Touchmaster esta disenada 
para trabajar con una amplia gama de maquinas 
personales (algunas de las cuales requeriran un 
cable o una interface apropiada). Este dispositivo 
se esta promoeionando, asimismo, como teclado de 




recambio, pero la simplicidad de su diseno implica 
que dicha utilization se ve limitada a la selection de 
opciones de menu o al control de juegos. Para la 
entrada de datos, asf como para la carga del propio 
software del Touchmaster. sigue siendo necesario 
un teclado de ordenador. 

Ei Touchmaster viene instalado en una carcasa 
plastica de color gris que mide 350x330x35 mm. 
La parte posterior de la misma esta ligeramente 
elevada, formando un angulo adecuado para di- 
bujar. Se suministra con un iransformador y un 
LED rojo que indica si el dispositivo esta conecta- 
do o no, Para que la tablilla se pueda utilizar con 
una amplia gama de maquinas personales, en el 
panel posterior hay instalados concctores para in- 
terfaces tanto en serie como en paralelo, junto con 
un conector (que no se menciona en Ios manuales) 
para un interruptor de pie. En realidad, Ios manua- 
les no son muy adecuados: ei de hardware ofrece 
Instrucciones para la conexion de la tablilla y pro- 
porciona algunos programas send! Ios en basic para 
leer coordenadas, pero carece de los suficientes de- 
tail es. 

La tablilla se basa en la tecnologia de membrana 
desarrollada en los teclados del ZX81 y del Spec- 
trum, y ofrece una resolution de 256x256 pixels. 
La capa superior esta separada de la pelicula sensi- 
tiva inferior por un tejido aislante, y la presion efec- 
tuada sobre la capa superior la obliga a hacer con- 
tacto con la pelicula, La tablilla contiene un micro- 
procesador que explora la pelicula sensitiva en una 
direction, mientras explora al mis mo tiempo la 
capa inferior en otra direccion, y la coordenada del 
u pun to de contacto" se envia entonces a traves de 
interfaces tanto en serie como en paralelo. La inter- 
face en serie se utiliza para conectar la tablilla al 
BBC Micro, mientras que la interface en paralelo 
es necesaria para emplearla con el Commodore 64, 
el Vic-20, el Spectrum y el Dragon. La resolucion 
del Touchmaster es inferior a la que proporcionan 
muchas visualizaciones en pantalla de alta resolu- 
cion, de modo que los usuarios del BBC Micro, por 
ejemplo, no podran resolver un pixel individual en 
ModeO. 





Programa Multipaint 

Con el Touchmaster se proporciona un programa 
de dibujo llamado Multipaint. Este ofrece una de- 
mostracion de las facilidades disponibles, pero no 
representa una gran ayuda para los graficos, Una 
plant ilia plastica proporciona un menu de las facili- 
dades, con la opci6n elegida visualizada en una 
vent ana de "estado" en la parte inferior de la pan- 
talla. Se pueden utilizar cinco tipos distintos de pin- 
cel; el ancho de cada uno puede oscilar entre 2 y 32 
pixels, en pasos de dos pixels. La ventana muestra, 
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asimismo, la modalidad en curso de dibujo (Dots, 
Points o Freehand: pixels, puntos o mano alzada) y 
los colores selcecionados para primer piano y 
fondo, Estos sc pueden cambiar pulsando la option 
requerida del menu hasta que aparezca en la venta- 
na de estado. 

Una vez se ban seleccionado los colores y los 
tipos de pincel, hay otras opciones disponibles para 
la creation de cajas, tirculos, poligonos y lineas 
"elasticas". Con el paqnete se proporciona un pun- 
zon, pero tambien se puede utilizar la presion de 
los dedos. El Touchmaster, con la gran superficie 
de su tablilla, no se ve afectado por las mismas res- 
tricciones del Koala-pad; la presion de un dedo se 
puede tradurir a una coordenada exacta y no a una 
mera aproximacion, jde mode que el dibujo clcc- 
tronico a dedo es realmente posible! 

Lamentablernente, el Touchmaster no ofrece 
mas que facilidades rudimentarias. Hay una opcion 
FILL (rellenar) niarcada en la plantilla y documenta- 
da en los manualcs, pero (al menos en el Spectrum) 
la misma no parece funcionar de la forma esperada. 
Tampoco hay una facilidad para ampliation ni para 
edition, lo que significa que los colores no se pue- 
den cambiar. En el Spectrum, con el cual suele ser 
mas facii dibujar en bianco y negro antes de afiadir 
color- esto constiruye una evidente desventaja* 

Como elemento de hardware, la tablilla Touch- 
master esta en una position mucho mejor frente a 
rivales como el Grafpad y e! Koala-pad. Es de 
construction solida y ofrece una superficie de di- 
bujo de tamano A4 que se puede conectar a la 
mayoria de los ordenadores personales mas popula- 
res. Una ventaja significativa es que si en el futuro 
usted decide ampliar su maquina o directamente 
cambiarla por otra, todo lo que se requiere es una 
nueva interface; ademas, por supuesto, del softwa- 
re adecuado. 

Resulta decepcionante que la documentation y 
el software suministrados scan tan pobres en eom- 
paraci6n con el estandar de la tablilla. El Touch- 
master esta dando origen a una gama de software 
disenado especificamente para usar con esta tabli- 
lla, si bien la verdadcra prueba de su 6xito se pro- 
ducira cuando las casas de software independientes 
decidan apoyarla. 



TOUCHMASTER MSX 



350x330x35- mm 



Se proporcionan puertas en 
serie y en paraleio para 
utilizar con una vasta gama 
de ordenadores personaSes o 
con el prop io teclado deS 
Toucnmaster 



Si bien los manuales 
contienen la information 
necesaria para utilizar el 
Touchmaster, hublera sido 
de agradecer una 
information mas detallada 



La ampiia gama de 
Interfaces, junto con los 
diferentes paquetes de 
software, hacen det 
Touchmaster un periterico 
surname nte adaptable 



La ealidad del software 
queda en una posicion muy 
precaria si se la compara 
con la de dispositivos 
similares; los manuates son 
limitados 



Las etapas de una escena 

B Touchmaster se puede utilizar como tablitla para g rati cos con 
ei software Multipaint y la cubterta que se proporciona con el 
producto. En las fotografias vemos las etapas de una escena, 
"5 el bosquejo hasta la imagen coloreada y so m bread a 




De colores 

Existen diversas utilidades y 
programas parajuegos, de 
entretenimientoy educativos a 
la venta para el Touchmaster 
en las principals tiendas 
especialrzadas. Cada 
J* paquete incfuye el software 
\ % apropiado (para una gama 
de micros), instructions 
'1 * e imaginativas cubiertas, 
\ algunas de las cuales 
1 se pueden apreciaraqui 



1311 



cQuien lo hizo? 

Mostramos la preparacion de una base de datos sencilla en un 
ejemplo que propone la investigation de un crimen 



En una pequena localidad de los Andes se ha per- 
petrado un asesinato. Zacarias ha sido atacado con 
un hacha y rauerto. Sabemos que tanto Mateo 
como Jose posccn hat: has, que Jaime y Este ban po- 
seen escopetas y que la prima Juan a ticne un cuchi- 
llo. Mateo y Jaime tenfan sangre en las manos 
cuando el cornisario loeal los intcrrogo. 

Nuestra base de datos en logo sobrc este erimen 
consistira en una lista dc hechos, cada uno de los 
cualcs consistira en una relation, junto con uno o 
mas sustantrvos. Al representarlo en logo, un 
hecho es [POSEE MATEO HACHA] o, en correcto cas- 
tellano, "Mateo posee un hacha". Para representar 
el hecho de que Jaime tenia sangre en las manos 
utilizamos [ENSANGRENTADO JAIME]. 

Comenzamos nuestra investigation con una base 
de datos vatia: 

TO PREPARACION 

MAKE "BASEDATOS [] 
END 

Luego vamos anadiendo hechos a nuestra base de 
datos a medida que los vamos descubriendo (siem- 
pre y cuando no estuvieran ya en ell a). For ejem- 
plo, entrariamos AGREGAR [POSEE JUANA CUCH1- 
LLO] empleando este procedimiento: 

TO AGREGAR :HECH0 

IF NOT MEMBER? ;HECH0 : BASED ATOS THEM 

MAKE "BASEDATOS FPUT :HECH0 

:BASEDATOS 
END 

La base de datos finalmente estara llena con: 

[[ENSANGRENTADO MATEO] [ENSANGRENTADO 
JAIME] [ASESINADO 

ZACARIAS HACHA] [POSEE MATEO HACHA] 
[POSEE JOSE HACHA] [POSEE JAIME ESCOPETA] 
[POSEE ESTEBAN ESCOPETA] [POSEE JUANA 

CUCH1LL0]] 

Para imprimir la base de datos utilice el procedi- 
miento MOSTRAR, El mismo puede ir seguido ya 
sea de "TODO, en cuyo caso se imprimira toda la 
base de datos, o bien del nombre de una relation, 
en cuyo caso solo se imprtmiran los hechos de esa 
relation. For GOiisiguierite, MOSTRAR "POSEE nos 
mostrara quien posee que. 

" TO MOSTRAR :S 

IF :S="T0D0 THEN LISTAR JODO : BASEDATOS 
LISTAR.REL :S : BASEDATOS 
END 

TO LISTAR JODO :LISTA 
IF EMPTY? :LISTA THEN STOP 
PRINT FIRST :LISTA 
LI STAR, TO DO BUTFIRST 1ISTA 

END 

TO LISTAR, REL:S 1ISTA 
IF EMPTY? : LISTA THEN STOP 



IF :S-FIRST FIRST 1ISTA THEN PRINT FIRST 
; LISTA 

LI STAR .R EL :S BUTFIRST :USTA 
END 

Ahora debemos pensar en formas de interrogar a 
la base de datos. La forma de interrogation mas 
sencilla consiste en comprobar si se sabe que un 
hecho es verdadero. Esto lo hacemos mediante un 
procedimiento llamado PREG, que comprueba si 
un hecho esta incluido en la base de datos. Por 
ejemplo, PREG [POSEE JUANA CUCHILLO] daria 
como respuesta SL 

TO PREG :HECH0 
IF MEMBER? :HECH0 : BASEDATOS PRINT "SI 
ELSE PRINT 11 NO 

END 

Para nuestra investigation sena mucho mas util 
que pudieramos formular preguntas como 
"^Guien posee un hacha? **. Esto lo manejaremos 
empleando "variables". Se dara por sentado que 
toda palabra cuyo primer caracter sea un ? es una 
variable. Entonces podemos parafrasear la pre- 
gunta asi: 

CUAL [POSEE 7ALGUIEN HACHA] 

r La respuesta a esto sena una lista de todos los 
valor es posibles de la variable ?ALGUIEN que sean 
cohe rentes con la information de la base de datos, 

[7ALGUIEN MATEO] 

[7ALGUIEN JOSE] 

NO (MAS) RESPUESTAS 

Podemos tener multiples variables, Por ejemplo: 
CUAL [MATO ?H0MBRE 7UTENSIU0] 

dara la respuesta: 
[7H0MBRE ZACARIAS] [?UTENSILIO HACHA] 
NO (MAS) RESPUESTAS 

Co n side re mo s individualmente los proccdimien- 
tos que hacen viable este anahsis de la base de 
datos. CUAL le pasa la tarea a HALLAR. indicando 
BASEDATOS como la fuente de hechos. 

TO CUAL :INTERR0GACI0N 

HALLAR :INTERR0GACION : BASEDATOS 

PRINT [NO (MAS) RESPUESTAS] 
EivD 

HALLAR crea dos variables globales, VARS y RESP: 
VARS se utiliza para retener cada posiblc con junto 
de valores de las variables de la pregunta, y estos 
se reunen en la lista RESP. 

TO HALLAR ;)NTERROGANTES :DAT0S 
MAKE "VARS [] 
MAKE "RESP [] 

COMPARAR JNTERROGACION :DAT0S 
PRINTL :RESP 
END 



COMPARAR examina cada uno de ios hcchos de la 
base de datos de uno en uno. De haber un cmpa- 
rejamiento, el nuevo conjunto de valores de VARS 
se agrega a RESP antes de volver a colocar a VARS 
en la lista vacfa. COMPARAR sigue entonees tra- 
bajando en la base de datos para ver si existe algu- 
na otra posible pareja. 

TO COMPARAR :1NTERR0GACI0N : DATOS 
IF EMPTY? : DATOS THEN STOP 
IF PAREJA? :INTERR0GACI0N FIRST :DAT0S 
THEN MAKE "RESP FPUT :VARS :RESP 
MAKE "VARS [] 

COMPARAR :INTERR0GACI0N BUTFIRST :DAT0S 
END 

Para apreciar to que hace PAREJA? considere el 
caso en el cual las entradas sean [POSEE 7ALGUIEN 
HACHA] y [POSEE JOSE HACHA], en respuesta a las 
cuales PAREJA? producira TRUE y establccera 
VARS en [7ALGUIEN JOSE]. Si las entradas fueran 
[POSEE 7ALGUIEN HACHA] v [MATO ZACARIAS 
HACHA], entonees PAREJA? produciria FALSE. 

Las verdaderas dificultades surgen. sin embar- 
go, cuando hay implicada mas de una variable. Se 
emplea VALOR? para verificar si la variable ya se 
le ha asignado un valor para ese hecho en la base 
de datos, 

AquI hemos utilizado una notation alternativa 
para las condiciones del logo. TEST evalua una 
condicidn. Si el resultado es verdadero. se lievan 
a cabo las acciones que van despucs de IFTRUE; de 
lo contrario, se efectuan las acciones que siguen a 
IFFALSE. 

TO PAREJA? JNTERROGACION :HECH0 
IFALLOF EMPTY? :INTERR0GAC10N EMPTY? 

:HECH0 THEN OUTPUT "TRUE 
TEST FIRST FIRST ;INTERR0GACI0N="? 
IFTRUE IF NOT VALOR? FIRST :INTERR0GACI0N 

FIRST :HECH0 :VARS THEN OUTPUT "FALSE 
IFFALSE IF NOT (FIRST :INTERROGACI0N= 

FIRST :HECH0) THEN OUTPUT "FALSE 

OUTPUT PAREJA? BUTFIRST 

:INTERR0GACI0N 
BUTRRST :HECH0 
EM 

fi i h i I ill I f— ii Mt i Vfll OR" considere mos en 
ma hnr el cam cm cJ que bs entradas sean 
?UTBEUO, HACHA • [7HOM8RE ZACARIAS]. 

zt-i—.-Ui li". arable 7_~\S- 
UO podria tener el valor HACHA. Esisren ires post- 
bflidades: ?UTB£ftJO va posee un valor, que no 
es HACHA. v VALOR? produce FALSO: ?UTENS!LJ0 
ya posee el valor HACHA. v VALOR? produce VER- 
DADERO; o 7UTENSILI0 no' posee ningun valor, de 
modo que se le da el valor HACHA, y se agrega esta 
information a VARS y se produce VERDADERO. 

TO VALOR? :N0MBRE : VALOR :VLISTA 
IF EMPTY? :VLISTA THEN MAKE "VARS LPUT 
LiST rNOMBRE :VAL0R :VARS OUTPUT 
"TRUE 

TEST :NOMBRE=RRt T FIRST :VLISTA 
IFTRUE IF :VALOR=LAST FIRST :VLISTA THEN 

OUTPUT "TRUE ELSE OUTPUT "FALSE 
OUTPUT VALOR? :N0MBRE :VAL0R BUTFIRST 

:VLISTA 

END 

PRINTL hace que los componentes de RESP se im- 
priman uno debajo del otro. 



TO PRINTL : LISTA 

IF EMPTY? 1ISTA STOP 

PRINT FIRST ;LISTA 

PRINTL BUTFIRST :LISTA 
END 

Interrogatories mas 
complejos 

Nucstra investigation no llegara muy lejos, sin em- 
bargo, a menos que podamos formular preguntas 
mas complejas, tales como 4 '^Con que utensilio fue 
asesinado Zacarias y quien posee un utensilio como 
ese?". En logo, esto se lee: 

CUAL [[MATO ZACARIAS 7UTENSILI0] 
[POSEE 780SPECHOSO ?UTENSILfO]] 

Ahora CUAL toraa como entrada una lista de pre- 
guntas, y los valores hallados seran aquellos que 
hagan que todas ellas resulten verdaderas, Enton- 
ees, si se desea formular una unica pregunta con 
esta nueva forma de CUAL, la sintaxis que uliliza- 
mos es: 

CUAL [[POSEE ?ALGUN CUCHILLO]] 

En estos procedimientos solo es necesario introdu- 
cir unas Jigeras modhicationes: 

TO CUAL :INTERROGANTES 

HALLAR TNTERROGANTES :BASEDATOS 

PRINT [NO (MAS) RESPUESTAS] 
END 

TO HALLAR :INTERROGANTES :DAT0S 
MAKE "VARS [] 
MAKE "RESP [] 

COMPARAR :INTERROGANTES :DAT0S 
PRINTL :RESP 
END 

Ahora COMPARAR tiene que realizar una tarea bas^ 
tante dificil. Tomemos como ejemplo la entrada 
[[MATO ZACARIAS 7UTENSILI0] [POSEE 7SQSPECH0- 
SO 7UTENSILI0]]. COMPARAR revisa la base de 
datos, de hecho en hecho, en busea de una pareja 
para el primer interrogante, y acaba emparejando 
7UTENSILI0 con HACHA, La rutina considera enton- 
ees el segundo interrogante ([POSEE 7SOSPECHOS0 
?UTENSIUO] K empezando otra vez por el comienzo 
da Mi base de datos. Se encuentra una pareja para la 
seeuoda coodicion. con el valor para 7UTENSILIQ de 
HACHA y el de MATEO para 7S0SPECH0S0. No hay 
ningun ouo interrogante. de modo que esta es una 
posible solution. 

Pero lodavfa no hemos terminado; puede haber 
otros valores que satisfagan el segundo interrogan- 
te, manteniendo a 7UTENS1LI0 como HACHA. De 
modo que comparar prosigue revisando la base de 
datos a partir del lugar en que la dejo, y realmente 
encuentra una segunda solution para 7S0SPECH0- 
SO con JOSE. Por supuesto, el procedimiento no se 
detiene alii, sino que continua buscando en la BASE- 
DATOS. En esta ocasion llega hasta el final sin haber 
encontrado ningun otro valor cmparejado* 

Es posible, no obstante, que exista otra solution 
para el primer interrogante distinta de HACHA para 
7UTENSILI0, de manera que hemos de volver atras 
hasta el pun to dc la base de datos en el que encon- 
tramos la pareja y continuar desde allL Este proce- 
so se denomina vuelta atras (backtracking). En este 
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Complem. 

al LOGO 

Algunas version es de logo 
MIT no poseen EMPTY? ni 
MEMBER? Ya nemos ofrecido 
deflniciones para alias en 
anteriores Cowpfementos 

at LOGO, 

En to das las versiones LCSI 
utilice EMPTYP por EMPTY? y 
MEMBER? por MEMBER? 
Existe una primitiva, EQUALP, 
que comprueba si sus dos 
entradas son igu ales. 
Emp^ela para comparar iistas 
y palabras en lugar del signo 
de igualdad (que funciona 
para listas sdlo en algunas 
version es LCSI), 
La sin taxis IF del logo LCSI 
queda demostrada de la 
siguiente manera: 

IF EMPTYP :CONTENIDQ 
[PRINT[NADA ESPECIAL]] 
[PRINT ;CONTEN EDO] 

Si la condicibn es verdadera 
se Jleva a cabo la primera lista 
despuesde 3a condition y la 
segunda si es falsa. 
El logo LCSI tambien ad mile 
lasmtaxisTEST, IFTRUE, 
IFFALSE para las condiciones 
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Enigma de un crimen 



El senor Harcourtfue hallado en la parte trasera de 
una furgoneta con 30 puftaladas hechas con un 
cm cel. La policia identifico a cuafro sospechosos: 
un constructor, un carnicero, una jardinera y un 
diserlador, Cada uno de ellos tuvo acceso a 
instrumentos punzantes: un cuchillo (ef carnicero), 
tijeras (la jardinera), un cortador (eJ disenador) y un 
cincel (el constructor). Uno de ellos fue visto en una 
esquina r otro en el cobertizo de un jardm, y un 
tercero aseguro haber estado acostado, durmiendo. 
El que pueda ser relacionado con la furgoneta es el 
asesino. La investigation condujo a lo siguiente: 
1) La noche del crimen, ningun sospechoso estaba 
en posesidn de su herramlenta; 2) Al carnicero se le 
vio en el cobertizo abriendo cartas con el cortador; 
3) Un testigo presencial confirmd que el constructor 
se hallaba parade en una esquina, donde !a jardinera 
encontraria luego las tijeras que le faltaban; 4) La 
jardinera estaba acostada, y utilizo" un cuchillo de 
carnicero para prepararse un bocadillo 



caso, en realidad no existe ningun a otra solution, 
Para no perder la pista del punto en que se en* 
cuentra en su asignacion de variables, COMPARAR 
coloca los valores actuates en una pila antes de utili- 
zar PAREJA? (puesto que PAREJA? podna alterar 
estos valores), y posteriormente los recupera. Este 
es el procedimiento complete: 

TO COMPARAR :!NTERROGANTES :DATOS 
IF EMPTY? : INTERROGATES THEN MAKE 

"RESP FPUT :VARS :RESP STOP 
IF EMPTY? ;DAT0S THEN STOP 
EMPUJAR :VARS 

TEST PAREJA? FIRST : INTERROGATES FIRST 
:DATOS 

IFTRUE COMPARAR BUTFIRST MNTERROGANTES 

:BASEDATOS 
TIRAR "VARS 

COMPARAR : INTERROGATES BUTFIRST :DATOS 
END 

En COMPARAR utilizamos una pila para seguir la 
pista del valor de VARS, en lugar de una variable 
temporal, debido a que COMPARAR se llamaria a si 
misma entre el momento en que desearamos guar- 
dar los valores y el momento en que desearamos 
recuperarlos. Por consiguiente, cualquier variable 



temporal de este tipo seria destruida en la siguiente 
llamada y se perderian los valores originates. La 
pila impide que suceda esto. 

EMPUJAR coloca un valor "encima" de la pila, 
creando primero la variable PILA si la misma no 
existiera aun. 

TO EMPUJAR :DATOS 

IF NOT THING? :PILA THEN MAKE "PILA [] 

MAKE "PILA FPUT :DATOS :PILA 
END 

TfRAR toma un elemento de la pila y lo asigna a una 
variable. 

TO TtRAR :NOMBRE 

MAKE :NOMBRE FIRST :?\YA 

MAKE "PILA BUTFIRST :PILA 
END 

Lo que tenemos ahora son los rudimentos de un 
lenguaje de " program acion 16gica". Este es un len- 
guaje en el que simplemente se ariaden hechos y 
reglas a una base de dates y luego se interroga a esa 
base de datos mediante descripciones 16gicas de los 
datos que se requieren, Hasta la fecha, el mejor 
ejemplo de lenguaje de programacion logico es el 
prolog; ipero esa es otra historia! 



Paso a paso 



Estudiaremos en este capitulo ios motores paso a paso, usados 
de manera preferential en el control de Ios movimientos de todo 
tipo de robots 



La construction de on motor paso a paso es muy 
diferente de la de un motor normal. Para compren- 
der sus principios de funcionamiento, veremos en 
primer lugar como trabaja un motor paso a paso 
simplificado. 

En nuestro ejemplo (vease el diagrama titulado 
"Un paso cada vez" en la pagina siguiente) hay dos 
juegos de bobinas ("a" y "b") en el estator y dos 
pares de polos electromagneticos en el rotor. En los 
motores que utilizamos en la construcci6n de nues- 
tro robot se incluye un mayor numero de bobinas 
de estator y de polos de rotor que los que aparecen 
en el ejemplo. 

El unico problema de esta conveniente forma de 
control de motor es que el motor consume tanta 
corriente cuando esta parado como cuando esta en 
movimiento. 

For otra parte, no es posible hacer girar el motor 
a gran velocidad: las distintas bobinas no se pueden 
activar y desactivar con la rapidez suficicnte. No 
obstante, ninguno de estos problemas tiene impor- 
tancia en nuestra aplicacion, 

Nuestro motor simplificado solo puede girar en 
pasos de 45°, Ademas, no se puede eontrolar la di- 
rection de la rotation. Los motores utilizados en el 
robot, sin embargo, poseen cuatro juegos de bobi- 
nas que se activan por pares, y el rotor, asimismo, 
posee much as mas bobinas de las que muestra 
nuestro ejemplo. Ello significa que si se puede eon- 
trolar la direction de rotation y que el angulo de 
paso se reduce a 7,5°. Para conseguir este giro por 
pasos tan preciso, se deben activar las cuatro bobi- 
nas en una secuencia dada y compleja, del siguiente 



Paso 

1 



Tabla de la secuencia de activacion 
Bobina A Bobina B Bobina C Bobina D 



encendida apagada eneendida apagada 

2 apagada encendida encendida apagada 

3 apagada encendida apagada encendida 

4 encendida apagada apagada encendida 

5 encendida apagada encendida apagada 
Esta secuencia de activacion se podria gestionar 
mediante software, utilizando cuatro bits de la 
puerta para el usuario para eontrolar las cuatro bo- 
binas. Sin embargo, ello requiere una programa- 
cion complicada y, ciertamente, el basic no produ- 
ciria estas secuencias de control con la rapidez sufi- 
ciente, Un metodo mas sencillo consiste en emplear 
un chip que ha sido disenado especialmente para el 
control de motores paso a paso; el SAA 1027. Este 
contiene los activadores de salida y todos los circui- 
tos logicos para activar las bobinas en el orden co- 
rrecto necesario para activar un motor paso a paso. 

Para hacer que el motor efectue un giro de un 
paso, se requiere un unico impulso proveniente de 
la puerta para el usuario, siendo necesaria aun otra 
linea de senal para determinar la direction de la 
rotation. El chip contiene etapas de entrada para 
detectar los cambios en las tres entradas: un impul- 
so para hacer que el motor gire un paso, una entra- 
da de initialization y una entrada de direccion que 
invierte la secuencia activadora de las bobinas del 
estator. Las entradas van a parar a un circuito con- 
tador bidireccional para producir la correcta se- 
cuencia de salidas hacia las bobinas del estator. 

Por ultimo, el chip tambien contiene una etapa 
activadora de salida de potencia que puede mani- 
pular hasta 550 mW. La inclusion de esta etapa sig- 
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Activando 
(as bobinas 

El diagrama muestra como las 
cuatro bobinas se energizan en 
secuencia, produciendo en ei 
rotor un movimiento en sentido 
horario. Despuesde haberse 
completado ios pasos 1 , 2, 3 y 4 
la secuencia se reinicia, 
activando el paso 5 la mis ma 
combination de bobinas que el 
paso 1 , Cuando cambia la senal 
de direccion, la secuencia se 
invierte. El paso 9 activa las 
bobinas en la mis ma 
combinacion que el paso 7; el 
paso 10 energiza las bobinas de 
la misma forma que el paso 6 , y 
as i sucesivamente, haciendo 
que el rotor gire en sentido 
antthorario, siendo la position 
del rotor despues del paso 8 la 
direccitin mis extrema en el 
sentido horario 
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Bricolaje/Construccion de un robot 



nifica que el motor se puede conectar direct amente 
al chip sin que exista necesidad de transistores de 
potentia externos. 

La complejidad del chip activador de motores 
paso a paso permitc que el resto del circuito necesa- 
rio para el control del robot sea verdaderamente 
muy simple. Cada motor requiere uno de estos 
chips, al cual se conecta el motor, Lamentablemen- 
tc, los chips activadores operan a un voltaje de aire- 
dedor de 12 V, mientras que la puerta para el usua- 
rio de su ordenador opera a 5 V. Es decir, un 0 
logico es 0 V (mas o menos) y un 1 logico es 5 V, 
Las entradas del chip activador exigen 0 V para una 
entrada 0 y entrc 7,5 y 12 V para un 1. Para la 
conexion en interface de la puerta para el usuario 
con los chips activadores tambien prccisarcmos un 
chip buffer especial de dos voltajes con las entradas 
opcrando en un voltaje y las salidas en otro. Este es 
el chip 40109, tambien necesario para el circuito. 



Lista 


de componentes 


Cantidad 


Articulo 


1 


Chip buffer 401 09 


3 


ConectorDlLde 16 patillas 


2 


Resistencia de 100 ohmios 


2 


Resistencia de 270 ohmios 0,5 W 


I 


Ljonaensacior ae u , i ur 


1 


Condensadorde1000 uF25V 


1 


Veroboard de 24 franjasxSO 




agujeros 


1 


RoSlo cable estanado 20 swg 


PIEZAS DE RADIO 


2 


Activador de motor paso a paso 




SAA1027 



Un paso 
cada vez 

Este diagrama simplificado de 
un motor paso a paso muestra 
dos circuitos de bobinas del 
estator, ay^yun rotor. El 
rotor se ve obligado a girar en 
sentido horario rnediante la 
activation alterna de los dos 
circuitos de bobinas. Observe 
que los pares de bob in as A1 y 
A2estan bobinadosen 
direceiones contra has, Cuando 
se activa la bobina a, induciendo 
polos sur en el par A1 , en el par 
A2 se inducen polos norte. Los 
pares de bobinas B1 y B2 estan 
igualmente bobinadosen 
sentidos contrarios. El angulo 
mmimo de paso q ue puede 
describtr este motor es de 45° 
Los motores uti I izados en 
nuestro robot poseen mas 
bobinas en el estator y mayor 
numero de polos en el rotor. \o 
que permite que roten en pasos 
de7,5 D 




La fuerza motriz 

Sibien la i6gicadeios chips 
activadores de motores paso a 
paso escompleja, los principios 
de operacidn son faciles de 
co mp render. Con el fin de hacer 
girar el rotor, se deben activar 
las bobinas del estator de 
acuerdo a una determinada 
secuencia. Un contador 
bidireccional se mueve a travel 
de esta secuencia de una eta pa 
cada vez en respuesta a una 
serial de impulse, Los pasos de 
la secuencia tambien se puede n 
efectuar en la direction opuesta 
si se cambia la entrada de la 
linea deduction, hacienda que 
el motor gire en el sentido 
contrario, U na tercera entrada 
permite, si es necesario, 
devoJver el rotor a la position 
que ocupaba al comienzo de la 
secuencia 
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CONTADOR 
SINCR0N0 
BIDIRECCIONAL 
DE 4 
P0SICI0NES 



ETAPA DE 
SAUDA 



SAA1027 



MOTOR 
PASO A PASO 
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Construccion de un robot Bricolaje 



+12 V " 
+ 5V - 
W ■ 
D1 . 
02 - 

03 ; 
D5 : 

07 ■ 



:iooo ^ 



r 



: &4 

- D6 



TIERRA" 



-Ih - 

0,1 \if 



m 



0,1 |iF 



3 
m 1 " 

IT 



JL 



MOTOR Z 



CON DENS. 

1000 iif= 



CHIP ACT1V 
SAA 1027 



CON DENS 

0.1 llF 



o|c occ o c fcoooc 
np occ z ctOGCc 
coocc ioocc 
^Bpo c 

_n 

cope 



CHIP SAA 
ACTl V AD OR 1027 



RESISTENCIA 27012 
RESISTENCIA 100 O 




El diagrama del cirouito 

U circuitena necesaria para 
activar Ids dos motores paso a 
paso es di recta, utiliz&ndose dos 
chips activadores SAA 1027 
para proporcionar la adecuada 
secuencia de activation de 
bobinas para cada motor. Dado 
que -las chips activadores ope ran 
a 12 Vy las serialesdela puerta 
para el usuario de su micro son 
de solo 5 V. se emplea un chip 
buffer adicional para aislar la 
circuitena de 12 V del ordenador 
y traducir las sen ales de la 
puerta para el usuario, de menor 
voltaje, a las sen ales de mayor 
voltaje que requieren los chips 
activadores. En el proximo 
capitulo le mostraremos como 
se conecta Sa placa de circuitos 
con los motores y el en chute D 3 
y como efectuar las conexiones 
correctas con la puerta para el 
usuario del ordenador 



CHIP BUFFER 40109 



CORTE DE 
PISTAS 



CHIP ACTIV 
SAA 1027 



Construccion de la placa 

■ Corte ia placa (tamano 24 franjas x 35 
agujeros) y efectue Ids cortes de prstas que se 
indlcan en el diagrama. 

a Suelde los tres conectores de chips y despues 
los cables de enlace, 

■ Suelde las cuatro resistencias, Es indistinto 
colocarlas en la placa con una u otra orientaci6n. 

■ Los dos condensadores de 0,1 tambien se 
pueden instalarcon cualquier orientation, pero el 
condensador grande de 1000 |aF se debe instalar 
con el terminal positive del lado de la placa donde 
estan los dos chips. 

■ Coloque los chips en su sitio , asegurandose de 
ponerlos del lado corrects El extremo del chip que 
tiene una muesca debe quedar del lado de la placa 
donde estan los dos conectores, 

■ Compruebe toda la placa. Verifique no solo que 
los componentes esten colocados correctamente, 
sino tambiGn que no haya gotas de soldadura que 
hagan puente entre pistas adyacentes. Pase la 
punta de un cuchillo a lo largo del agujero entre 
cada pista para eliminar cualquier resto de 
soldadura. 
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Atando cabos 



Concluimos nuestro curso sobre el lenguaje assembly del 6809. 
Nos queda solo atar algunos cabos sueltos del programa 
depurador 




El modulo principal como primer objetivo estable- 
cer el mecanismo de intemipti6n, lo que nos per- 
mits colocar puntos de ruptura en el programa a 
depurar. Estos transfieren el control al programa 
depurador y nos facilitan el poder inspeccionar el 
contenido de los registros y de las posiciones de me- 
moria. Debemos seguidamente obtener la direc- 
tion de inicio del programa a depurar para que el 
control pueda pasar a ella por medio de la orden S. 
El resto de la rutina principal se refiere a la obten- 
cion de ordenes desde el teclado y su ejecucion; el 
control se transfiere al programa a depurar por 
medio de las ordenes S y G y se devuelve al progra- 
ma depurador por medio de las instructions SWI 
insertadas en los puntos de ruptura. 

En la lection anterior ya se codificaron dos fases 
de inicializacidn para este modulo (vease p. 1297). 
El punto de entrada de las interrupciones sigue io- 
mediatamente a la llamada de la subrutina. Aqui la 
primera instruction S guard ar^ (Save) el puntero de 
la pila pra que pueda ser usado para referenciar los 
valores de los registros guard ados en la pila por la 
SWI. La siguiente fase es la interpretation de la 
orden. Ya hemos elaborado rutin as para produtir 
todas las ordenes, con lo cual el problema se reduce 
aqui a seleccionar la subrutina apropiada para la 
orden entrada. 

Uso de la tabla de salto 

Es posible codificar esto con algo semejante a un 
con junto de IF anidados* pero preferimos aprove- 
char la circunstancia de que la rutina To mar- Orden 
devuelve un desplazamiento a la tabla de caracteres 
de ordenes y nos llmitaremos a realizar est as llama- 
das empleando la tabla dc salto. Quiza no sea este 
el nietodo mas eficaz para el caso, pero es una tec- 
nica util que vale la pena conocer. Requiere el esta- 
blecimiento de una tabla de direceiones para cada 
una de las subrutinas que t rat an una orden. 

La instruction JMP, a diferencia de fas instruccio- 
nes de bifurcation, puede servirse de cualquiera de 
los modos normal es de directionamiento , incluidos 
el indexado y el indirecto. Si cargamos X con la di- 
rection base de la tabla y empleamos el desplaza- 
miento contenido en B (duplicado, ya que sera una 
tabla de direceiones de 16 bits, no como la tabla de 
letras de ordenes que es de 8 bits), ocurrira que la 
orden 

JMP [B,X] 

transferira el control a la rutina apropiada. La lla- 
mada BSR se realiza a la direction de esta instruc- 
tion de salto. Puesto que necesitamos establecer 
esta tabla por anticipado, es precise anadir otra 
fase en la inicializacion para llevar a cabo esta 
operation. 



Proceso Est.-Tabla-Saltos 

es una tabla de 8 direceiones de 16 bits 
etc., son las direceiones de inicio de 
las subrutinas de ordenes (command) 

FOR (para) cada subrutina 

Tomar direction de inicio 

Guardar direcci6n de inicio en Tabla-Saltos 
Endfor 

Debemos ahora ocuparnos de lo que pasa al final 
de la ejecucion, en el momento en que aparece la 
orden Q, abandonar (quit) , aunque en realidad hay 
muy poco que hacer. Parece logico dejar intactos 
tanto el depurador como el programa depurado, de 
mo do que puedan ser ejecutados de nuevo si fuera 
necesario. 

Al finalizar, la pila ha de quedar en la misma 
situation que tenia cuando comenzamos. Una solu- 
tion pudiera ser el empleo de otra pila indepen- 
diente para nuestro programa poniendo S a un 
valor nuevo y despues restaurar el antiguo. Es una 
tecnica gene rat mente util, pero en nuestro caso 
puede resultar dificil encontrar un espacio libre en 
la memoria, teniendo el depurador colocado enti- 
ma de otro programa, Una segunda solution con- 
siste en increment ar sencillamente S en una canti- 
dad adecuada para descartar lo que hayamos deja- 
do alh - . pero resulta diffcil porque desconocemos si 
ha sucedido o no una interruption y las cantidades 
en la pUa serian diferentes. La solucion mas inme- 
diata es guardar el valor initial de S y restablecerlo 
como ultima operation del programa. 

El mecanismo de interruption, segun se estable- 
ce en el procedimiento de inicializacion, almacena 
tres bytes en la direction dada por el vector SWJ en 
SFFFA; debemos almacenarta si no queremos obte- 
ner resultados desconcertantes en el momento en 
que el sistema operative emplee SWI para sus ope- 
ration es. Necesitamos ? pues, otra fase mas de ini- 
cializacion en la que guardemos estos valores que 
ban de ser restaurados en nuestra rutina de 
abandono. 

Proceso Guardar-Valores 

Data: 

Guarda se compone de cinco bytes que almacenaran 
los valores a salvar 

Puntero-Pila es ef valor en curso de S increm. en 2 
Vector-SWI se encuentra en SFFFA 
Proceso: 
Guardar Puntero-Pila en Guarda 
Tomar Vector-SWI 

Guardar tres bytes de Vector-SWI en Guarda 
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La rutina de abandono {orden Q) no tiene mas que 
invertir este proceso y devolver el control al sistema 
operative. Lo cual puede realizarse de varias mane- 
ras: la inslruccion SWI puede servir para ello, una 
vez restablecido so vector; o bien, se puede hacer 
un salio a un ponto conocido de entrada en el siste- 
ma operative. Es posible un sal to a traves del vec- 
tor de reinicio en SFFFE, para devolver el control al 
sistema operativo, aunque esto puede provocar una 
inicializaci6n de todo el sistema. 



Codigo del 6809/Lenguaje maquina 



Proceso Abandono 



Data: 



Guarda son cinco bytes para almacenar los valores a 
salvar 

Puntero-Pila es el valor en curso de S, increm. en 2 
Vector-SWI est* en SFFFA 
Vector-Reinicio esta en SFFFE 



Restaurar en Vector-SWI tres bytes de Guarda 



Flujo del programa 

Los presentes diagramas de 
flujo corresponden a los 
rnddulos del programa 
depuradordeerrores.se han 
cofocado segun ei orden en que 
son llamados per las restantes 
sub rutin as. Dentro delos 
diagramas, las celdillas 
ribeteadas de azui indican 
rutinas individuals a las que se 
llama 



Mtidulo principal 

( INlCfO ~) 

t 



Guardar datos en 
dir. del vector 
interrupcion 



Est.-Tabla-Salt o 

^Est f -Tab[a-Salto^ 



Est. Interrupcidn 

f Est Interrupcidn) 



Modulo de orden 

f ^Q bed ecer orden y 



Poner Y a dir. de 
Tabla-Salto 



Est. Tabla Sattos 



Tomar dir. de 
Qrden-Sig. 



Tomar dir. 
Vector-Inter. 

1 



Insertar 
Punto-Ruptura 



Almac. entrada 
JMP en dir. de 

Vector-Tnt er. [ 



Des insertar 
Punto-Ruptura 



Guardarla en Y 



C SALIDA ) 



Visualizar 
Punto-Ruptura 



Y^Y-2 



Tomar orden sig. 



Obedecer orden 



t_ 



Orden U 

CDesinsertar ^\ 
Punto-Rupt J 



Tomar dir. 
Punto-Rupt. 



Encontrar 
Tabla-Puntos-RupL 



— - 



Orden 6 

C Reanudar progQ 



Sustituir SWI 
con valor guard. 



Ajustar el Contador 
Programa 



Retorno de las 
inter rupciones 




Ortien B 



fns_ Punto-Rupt 



9 



Tomar Dir. 
Punto-Rupt. 
J 



C SALIDA ) 



Almac, en 
Tabla-Puntos-Rupt. 



Orden II 

(vis Puntos-Rupt) 




Incrementar Num. 
Puntos-Rupt 



SALIDA 



Orden R 

C Vfe. reg Astros j 




SALIDA 



Siguiente 
-Punto-Ruptura 



Tomar dir. 
Puntero-Pila 




Orden M 

f Inspec, memoriaT) 

/ r \ 

1 Tomar direccion [ 



C SALIDA ) 



'Vis. valores almac.j 
en direction 



incrementar 
direction 



Salto a Dir. 
Inicio 



Almac. SWI ei 
Sig.-Punto-Rupt, 



0 



C Abandonar J 
Limpiar Pila 



Guardar valores 
._v*uaL pox SWI.. 




Sust. valores 
g uardad os en 
dir. de Inter. 



FINAL ^) 



( SALIDA ) 
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Lenguaje maquina/Codigo del 6809 




Restaurar Puntero-Pila 
Salto al sistema operative 

Ya estamos preparados para codificar el modulo 
principal. Muy poco ha cambiado el diseno desde 
que se esbozo en un principio, y esencialmente 
sigue siendo el mismo. 

Modulo principal 

Data: 

Interrogation para entrada de la orden, es el caracter 
en ASCII 

Desplazamiento-Orden a la tabla de caracteres de 
ordenes y Tabla-Saltos 
Proceso: 

Guardar-Vaiores 
Establecer-Tabla-Saltos 
Establecer-lnterrupciones 
Tomar-Direcdoo-lniciQ 
REPEAT 
V i s u al izar- 1 rite rrogacidn 
Tomar-Orden 
Ejecutar-Orden 
INDEFINITELY 

Con ello conduye nuestro programa depurador de 



crrores. Parece que nos salio troceado en exceso, 
pero la fragment acion es tipica de la programacidn 
modular. En este punto podriamos optimizer la co- 
dificacion si nos dedicaramos a buscar atajos. Por 
ejemplo, se habra dado cucnta de que hemos ba- 
rajado una gran cantidad de valores solo para cer- 
ciorarnos de que se encontraban en el registro ade- 
cuado para una subrutina; si ahora redefine el em- 
pleo de los registros, cierfamente ahorrara pasos 
reiterative:^ Pero no se lo aconsejamos si el espacio 
de la memoria con que cuenta no es limit ado* 
Segun se van necesitando, hemos definido en bas- 
tantes sitios diferentes las mismas areas de datos. 
Dos son las maneras de manejar las areas dc datos 
en el programa complete: se pueden retciier los 
datos junto con el modulo que los emplea, que cs la 
mejor opcion teoriea; o bien pueden definirse todos 
los datos juntos al comienzo del programa, lo cual 
tiene sus ventajas reales cuando se desea utilizar un 
desensamblador (o fncluso un depurador) para el 
programa. 

El depurador debe ser cargado en cualquier es- 
pacio libie de la memoria que el programa a depu- 
raT no ocupe o emplee. Se le da entrada mediante 
nn salto al punto de entrada DEBUG (depurar); es, 
por tan to , necesario conocer su direction antes de 
comenzar. 





ADDD 


#2 


Soma dos en atencibn a la 






direccion de retorno 




STD 


,X++ 


Lo guards 




LDY 


SFFFA 


Toma dir. de vector inter. 




IDA 


,Y+ 


Toma el primer byte a guardar 




STA 


,X+ 


Lo guarda 




LDD 


,Y 


Toma otros dos bvtes 




STD 


,x 


Los guarda 




RTS 






Orden Q 






CMDQ 


LEAX 


SAVED, PCR 


Direccion de Guarda 




LDY 


SFFFA 


Vector-SWl 




LDA 


2.X 


Primero de tres bytes 




STA 


,Y+ 


Restaurado 




LDD 


3,X 


Otros dos bytes 




STD 


,Y 


Restaurados 




LDS 


,x 


Puntero-Pila guardado 




J MP 


[$FFFE] 


Salto mdir. por medio vector 








reinicio 


Modulo principal 




PROMPT 


FCB 


> 


Puntero-Pila para Visualizar- 


STACKP 


RMB 


2 


Registros 


DEBUG 


BSR 


SAVEIT 


Guardar-Valores 




BSR 


SETUPJ 


Establecer-Tabla-Salto 




BSR 


INIT 


Esta blece r- 1 nterru p cion y 






Tomar-Direccidn-lnicio 


ENTRY 


STS 


STACKP,PCR 


Guardar Puntero-Pila 




LEAX 


JTABLE.PCR 




REPT02 


LDA 


PROMPT.PCR 


To mar Interrogacidny 


BSR 


OUTCH 


visualizarlo 




BSR 


GETCOM 


Tomar Orden 




LSLB 




Doble despi. para tabla 16 bits 




BSR 


DOCMD 


Obedecer Orden 




BRA 


REPT02 


Siguiente Orden 



Establecer Tabla Salto 

JTABLE 
SETUPJ 



RMB 


16 


Espacio para ocho direcciones 




de dos bytes 


LEAY 


JTABLE, PCR 


Dir. base de tabla enY 


LEAX 


CMDB,PCR 


Direccion inicio dela 






subrutina CMDB 


STX 


,Y+ + 


La almacena en tabla 


LEAX 


CMDU.PCR 


Direccion inicio de 






subrutina CMDU 


STX 


,Y+ + 


La almacena en tabla 


LEAX 


CMDD.PCR 


Direccion inicio de 






subrutina CMDD 


STX 


,Y+ + 


La almacena en tabla 


LEAX 


CMOS, PCR 


Direccion inicio 




subrutina CMDS 


STX 


,Y+ + 


La almacena en tabla 


LEAX 


CMDG.PCR 


Direccion inicio 






subrutina CMDG 


STX 


,Y+ + 


La almacena en tabla 


LEAX 


CMDR.PCR 


Direccion inicio 




subrutina CMDR 


STX 


,Y+ + 


La almacena en tabla 


LEAX 


CMDM,PCR 


Direccion inicio 






subrutina CMDM 


STX 


,Y+ + 


La almacena en tabla 


LEAX 


CMDQ,PCR 


Direccion inicio 




subrutina CMDQ 


STX 


,Y+ + 


La almacena en tabla 



He a qui el salto ef active a la subrutina. Asumimos que X contiene la direccion de 
JTABLE (Tabla Salto) y B de! desplazamiento 

DOCMD JMP [B,X] 

Guardar Valores 

SAVED RMB 5 Cinco bytes por guardar 

SAVEIT LEAX SAVED , PCR Toma dir. para guardarla 

TFR S,D TransfiereSaO 
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Robots de elite 



Fijemos nuestra atencion en los robots mas sofisticados que es 
posible encontrar en el mercado: los que se utilizan para ensefiar 
los principios de la robot ica y aquellos que son representatives del 
arte del diseno modemo de robots 



Muchos de los robots que vamos a ver en este capi- 
tulo son cams, pero no entran en la categoria de 
robots industriales y estan disenados para su uso 
tamo en ei hogar como en la escuela. EI primer 
gmpo que analtzaremos es el que engloba los ro- 
bots cuya mgeoieria responde a un estandar eleva- 
do e incorporan miichas de las caracteristicas dc los 
-v..z -;: :7.^>:zi^'.t>. La principal diferencia 
. . . > y los brazos industriales es que la mayo- 
fiade los que menrionaremos aqui estan disenados 
para uso didactico y se emplean para ensefiar los 
principios de la robotica. 

La principal diferencia entre estos brazos y sus 
equivalentes industriales radiea en que estos son 
mas pequerios y tienen menos capacidad de mani- 
pulation de objetos grandes. En muchos casos. por 
supuesto, el mercado educativo se superponc al in- 
dustrial, ya que si lo que la aplicacion industrial ne- 
ccsita es un brazo relativamente ligero y pequerio. 
muchos de estos brazos cumplen con ral condition. 
Por ejempJo, puede que se requiera un robot indus- 
trial para manipular grandes lingotes de accro que 



pesen cientos de kilos, o para realizar una labor 
muy difcrente, como es ensamblar componentes en 
una placa de circuito impreso, tarea esta para la 
que no se requiere un brazo grande y potente. Por 
lo tamo, se puede considerar que los brazos-robot 
de esta categoria poseen el potencial para llevar a 
cabo aplieaeioncs serias. ademas de ser didacticos. 

La segunda categoria que vcreinos es la de aque- 
llos robots cuyo diseno incorpora los ul times adc- 
lantos logrados en robotica. Muchos de ellos esta- 
ran equipados con los poderes sensoriales que ya 
hemos arializado en anteriores capftulos. 

Robots didacticos 

Un brazo-robot de prccio moderado es el Mentor, 
de Cybernetic Applications. Se vende en forma de 
modelo para armar, posee seis grados de libertad 
(cintura, hombro, codo y tres ejes de rotation en la 
muneca) y esta activado por motores electricos, Se 
lo puede eontrolar desde un BBC Micro, un Vic-20 
o un Spectrum 




En amable compama 

Puesto que el Hero es a la vez 
movil y posee una pinza. puede 
servirle a su dueno una taza de 
te por las mananas (jsiempre y 
cuando, por supuesto. nohaya 
que subir alguna escalera desde 
lacocina hasta el dormitorio] ) , 
En la fotograf la vemos al Hero y 
al Mentor drsponiendose a 
saborear una taza de te 
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Apiicaciones/Robotica 



La misma empresa produce, a un predo rnuy su- 
perior, el Neptune 1 y el Neptune 2. Estos brazos 
pueden levantar hasta 2,5 kg y funcionan con ener- 



gia hidraulica, aunque utilizan agua y no ei fluido 
hidraulico normal que emplean la mayor parte de 
los robots de est a clase. Estos brazos tambien sc 




Brazos para aprender 

Las dos areas mas significativas de fa investigacion 
en microefectronica son el diseno de chips y la 
robotics. Son pocos los aficionados que pueden 
experimentar en los talleres de sus hogares con 
nuevos microchips, pero los robots se estan 
volviendo cada vez mas accesibles . La finalidad 
principal de los brazos-robot resefiados en este 
capitulo no es otra que contribuir a una mayor 
comprensibn del usuario acerca de como funcionan 
los robots. La major forma de acrecentar nuestros 
conocimientos sob re estos es examinar sistemas 
de operation e intentar perfeccionarlos. Los 
brazos-robot que vemos en la fotografia, el Micro 
Grasp de Powertran Cybernetics y ei Armdroid de 
Colne Robotics, se programa mediante el uso de 
microordenadores y poseen cinco grades de 
Hbertal Se los puede ad quirir total mente 
montados o en forma de modelos para armar 



NOMBRE 
T(P0 

LFUC. PRINCIPAL 
SENSORES 



GRADOS DE 
LIBERTAD 



PREGIO* 
ENERGIA 

SE CDNECTA AL 



FABRICADO 
FOR 

*En e menadobrianiDO 



NEPTUNE 1 



NEPTUNE 2 



Brazo 



Oidactica 



El pole ncid metro registra la 
pDSiaion, la pinza puede 
detectar su grado de cierre 



6: cintura, hombro, cado y 
elevacion de muneca, tone! 
de muneca y pinza 



E'l 250 



Hidraulica: bombadeagua 
activada per corriente 
electrica 



BBC Micro, Spectrum, 
Vic-20 



Cybernetic Applications 
Ltd., West Portway 
Industrial Estate, And over, 
Hampshire SP10 3NN 



Brazo 



Oidactica 



El potenciometfo registra la 
posicibn, la pinza puede 
detectar su grado de cierre 



7; cintura, hombro, codo. 
elevation de muneca, tone I 
de muneca, guihadade 
muneca y pinza 



£1 725 



Hidraulica: bombadeagua 
activada per corriente 
electrica 



BBC Micro, Spectrum, 
Vic-20 



Cy be rn elic Appii catio ns Ltd, 





Brazo 



D dad ca 



El potenctometro registra la 
position, la pinza puede 
detectar su grado de cierre 



6: cintura, hombro, codo y 
elevaci6n de muneca, tone! 
demunecay pinza 



£345 



Electrica 



BBC Micro, Spectrum, Vrc- 
20 



Cy be met i c Ap pi i catio ns Ltd. 



GENESIS P101 



Brazo 



Realimentacion positional 



6: cintura, hombro, codcy 
elevacion de muneca,, ton el 
de muneca y pinza 



£1 750 



Hidraulica: bomba de agua 
activada por corriente 
electrica 



Programado a traves de caja 
controladora; interface 
estandar RS232: BBC 
Micro, Spectrum, Vic-20 



Powertran Cybernetics, 
West Portway Industrial 
Estate, Andover, Hampshire 
SP10 3NN 



Robot mbvil 



Oidactica experimental 



Ultrasonrco, permite la 
deteccidn de movimiento. 
Los sensores detectan 256 
niveles de luzy sonido, 
Sensores tactiles en la pinza 



4; hombro, codo, muneca y 
pinza 



£1 995 



Bate ri as recargables 



Utilizando un ensamblador 
cruzado, el HEROse puede 
conectara cualquier micro 
que posea unapuerta en 
serie 



Zenith Data Systems, _ 
Bristol Road, Gloucester, 
6L2 6EE 
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Robotica/Aplicaciones 




pueden controlar con el BBC Micro, el Vic-20 y el 
Spectrum. EI Neptune 2 tiene dos velocidades de 
operacion diferentes; esto es de gran utilidad, por- 
que se io puede hacer mover rapidamente cuando 
se requieren grandes desplazamientos del brazo, y 
hacer tuego que reduzca su velocidad para los mo- 
■ . _■ 2 exijan mayor precision. 
?. ' tnr±n Cybernetics produce el Genesis P101, 
que posee seis grados de libertad y se vende en 
" — je modeto para arman Este modelo funeio- 
na con energia hidraulica y viene con una caja con- 
troladora para programar el robot, junto con una 
interface RS232 estandar gracias a la cual se lo 
puede conectar a la mayoria de los ordenadores. 
Este brazo tambien se puede adquirir premontado 
y probado a un precio superior. 

Un intercsante brazo de precio medio es el 
Cyber 310 de Cyber Robotics. Se vende premonta- 
do, Existen versiones para el BBC Micro, el Jupiter 
Ace, el Apple II, los Commodore Pet 3000/4000 y 
8000 y el Hector HRX. Funciona mediante mo to- 
res paso a paso y su capacidad para levantar pesos 
de solo 250 g. por lo cual es bastante ligero. pero 
sana de opciooes que ofrece es notable, Ademas 
de titspfmar oixx? grados de libertad. permite 
_-d =. 7- c _-^3iio POMUufc la acdenftaod j J^- 
n-kiAMJii dd brazo, lo que signifies que puede 
i forma em b caai se mtieve un brazo huma- 
ne altexando coosiantemeote su velocidad sesun 
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vaya eambiando la naturaieza de la tarea e imitan- 
do los efectos de la inercia. Todas las junturas se 
pueden mover simultaneamente y es posible especi- 
ficar la posicion del brazo ya sea como una posicion 
relativa (p. cj., indicandole al brazo que se despla- 
ce x unidades hacia adclante respecto a su posicion 
actual) o bien como una posicion absoluta (especifi- 
cando un movimiento hasta algiin punto en rela- 
tion a una posicidn "base"), Puede ser programado 
en basic y tambien en una version de forth, cono- 
cida como Robo forth y desarrollada por la firma 
fabric-ante. 

Ascendiendo en la gama de precios llegamos al 
HRA 933 y I1RA934 de Feedback Instruments, 
que se venden ya montados. Ambos son brazos que 
funcionan con energia hidraulica y pueden levantar 
1,35 kg con una precision de posicionamiento de 
3 mm. Ademas de contar con sensores de posicion 
para las junturas del brazo, los brazos poseen sen- 
sores tactiles en sus efectores finales. Estos senso- 
res indican que han cogido algo y permiten que el 
brazo controle ia fuerza aplicada en el memento de 
recoger objetos. El control se realiza a traves de 
una Interface RS232 y las instruceiones especificas 
para el control se imparten utilizando el Apple IL 
el Tandv TRS-80. el Commodore PET, el AIM 65 
y el MAT385. 

La robotica en estos 
momentos 

El robot Hero-1 de Zenith Data Systems se vende 
en forma de modelo para armar y ofrece algunas 
facilidades bastante notables. Es movil y posee un 
brazo que hacc uso de un sistema de coordenadas 
esfericas en virtud del cual el brazo puede exten- 
ders e y contraerse telescopicamente. El Hero esta 
equipado con una gran malriz de sensores para de- 
tectar movimiento, sonido y luz" incluyendo un sen- 
sor ultrasonico de distancia que contribute a evitar 
colisiones, y un sintetizador de voz que le propor- 
ciona un vocabulario ilimitado. Asimismo, posee 
un brazo con cinco grados de libertad. El ensam- 
blaje es muy laborioso; por este motivo es posible 
que el interesado desee adquirirlo ya arm ado. En 
este caso el precio se eleva sustancialmente. 

Todos estos robots son, en cierto sentido, poco 
masque un entretenimiemo cle lujo. desde el punto 
de vista de lo que realm ente pueden hacer para el 
usuario: y. eo realidad. hasta el momento su princi- 
pal uso ha sido por pane de firm as comerciales que 
desean emplear un robot eon fines pubhcitariosi re- 
panir en mano folleios en los puestos de las ferias 
de muestras o hacer demostraciones de productos. 
No obstante, representan la mejor tecnologia de la 
robotica existente en estos momentos, Todos el los 
utilizan sensores de una forma inteligente, se des^ 
plazan inteligentemente y poseen brazos inteligen- 
tes. Ninguno de ellos dispone de algun sistema de 
vision, pero si pueden hablar y pueden on senales 
acusticas y responder a las mismas. 

Huelga decir que su precio disuadira a much as 
personas de la tentacion de comprarlos, pero no 
por ello dejan de estar alii, como algo a lo que aspi- 
rar, algo que quiz a usted mismo sea capaz de hacer 
realidad construyendose su propio robot. Asimis- 
mo, constituyen un indicio del ritmo al cual esta 
avanzando la robotica. 
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Despegue vertical 

Iniciamos una serie en que analizaremos el denominado "software 
vertical", desarrollado para cumplir una f uncion especifica 
relacionada con medicina, derecho, periodismo, fotograf fa y otras 
actividades especializadas 



Existen muchisimas aplicaciones para los ordena- 
dores personates, much as de las cuales no son evi- 
de rites. Estas aplicaciones se han desarrollado a 
consccueneia de la adaptation creativa de software 
ya existente o de la generation de software para uso 
especial. Se dice que estas son aplicaciones del 
u mercado vertical* 1 porque se aplican a un grupo 
espetifico de personas, como pueden ser medicos, 
quimicos o psicologos. En esta serie analizaremos 
numerosos paquetes para el mercado vertical que 
revelan nuevas e interesantes facctas del uso de los 
microordenadores. Los siguientes ejernplos ayuda- 
ran a ilustrar la clase de problemas para cuya solu- 
tion se disena software vertical. 

Un grupo de padres de adolesce ntes adictos a la 
heroina, residentes en el West End londinense, esta 
utilizando el programa BrainStorm, de Caxton 
Software, para planificar una campana de divulga- 
tion dc sus actividades entre los medicos, asistentes 
socialcs y organos para la aplicacion de la ley de la 
localidad, El duerio de un restaurantc de Kent esta 
utilizando una hoja elcctronica Fracticaic para ana- 
lizar los pedidos de los clientes, con el fin de planifi- 
car sus futures menus. Una gran j a de Sussex esta 
utilizando el mismo programa (trabajando con cua- 
tro Commodore 64) para mane jar todo, desde sus 
proyectos de gran importancia hast a el control de 
sus costos de energfa. Un cirujano de un hospital 
de Londres esta aplicando el programa Superhase. 
de Precision Software, en la investigation que esta 
llevando a cabo sobre las causas del cancer y su 
curacion. 

En Gran Bret ana hay medicos que estan em- 
pleando ordenadores para cumplir con la nueva 
normativa de que todas las etiquetas de las recetas 
de los pacientes deben ir impresas y no escritas a 
mano, Un disenador de cocinas, de Lancashire 
(Gran Bretana), utiliza un programa (desarrollado 
para un BBC Micro por una pa re j a de amigos con 
los que juega a! billar) para ir colocando hornos, 
neveras y otros artefactos dc cocina en diferentes 
sitios sobre un piano del cspacio disponible basado 
en pant alia. Dc heeho, le ha result ado una ayuda 
tan eficaz cn su ncgocio de muebles de cocina (y 
dormitorio) , que ha form ado, junto con los disefia- 
dores originales del programa, una sociedad para 
of re cedes el sistema a otros comcrciantcs. 

Estos son ape n as unos pocos ejernplos de las 
nuevas respuestas a la ya traditional pregunta que 
formula todo probable comprador de un ordenador 
nuevo: u ^Para que sirve?" Se ha calculado que el 
usuario medio de un ordenador no explota mas del 
10 % del potential de la maquina, y esta puede ser 
una estimation incluso optimista. Invertir dinero en 
algo que luego se lirnita en un uso final, ya sea en- 
tre tenerse con jucgos o admin istrar las cuentas, no 



es tan rentable, teniendo en cuenta el costo, como 
expiotar su versatilidad al maximo. 

En este sentido existen dos alternativas. Una op- 
tion es encomrar nuevas aplicaciones para el soft- 
ware estandar. Un fotografo profesional dc Shef- 
field utiliza el modulo de control de stocks del pa- 
quete Anagram integrated accounts para admin is- 
trar su biblioteca de fotograffas, con lo que consi- 
gue sacar rendimiento de los originales de su archi- 
vo de copias y transparencias antiguas, Del mismo 
modo, algunas agencias de colocaciones utilizan la 
base de datos Tomorrow's office para cotejar las 
necesidades de sus clientes con el potential humano 
disponible, conservando los datos de los curriculum 
vitae en disco rigido y enviandolos por correo auto- 
maticamente. Esto es mucho mas barato que ulili- 
zar paquetes disenados especificamente para esa 
tare a: el paquete Body matching and marketing, 
producido por la firma AP Computer Consultants, 
tiene un precio que sobrepasa las mil libras esterli- 
nas (unas 200 000 ptas.). 

Diseno a medida 

La alternativa es buscar un paquete disefiado para 
el uso espeeffico que uno necesite. Imagmese que 
es un estudiante de teologia y tiene la mesa de estu- 
dio abarrotada de tomos enormes, coneordancias. 
notas. dictionaries bfblicos y cosas por el estilo. 
Bueno. puede que lo que necesite sea el "The 
Word" processor (procesador de la Palabra). de 
Bible Research Systems para el IBM y maquinas 
compatibles, Este paquete incluye la traduction 
completa del rev Jacobo L con facilidades comple- 
tes de busqueda para la creation de referencias cru- 
zadas en disco, 

Y si no se fia de ninguna de las traducciones del 
material biblico, puede compararlas con el original 
mcdiante un programa llamado The Greek translite- 
rate r, que le dara el equivalente en griego de cual- 
quier palabra o frase en ingles, y visual izara todos 
los casos en los que aparezca en el texto en ingles. 
Esto permite comparar las divers as form as en que 
se ha traducido una palabra. Estos e studios electro- 
nicos dc la Biblia, sin embargo, no son baratos. 
Estos dos program as le supondran un gasto que as- 
cendera a las 253 libras esterlinas cad a uno (unas 
50 OOOpias.). 

Vamos a ver otro paquete que a prim era vista 
pareceria igualmente improbable de hallar. Si us ted 
es un ingeniero que esta planificando desagiies y 
alcantarillas, entonces el MIDDUSS (el Mc Master 
interactive design of stormwater systems) le ayudara 
a medir tubenas, canales y estanques de almacena- 
miento, permitira que genere hidrograficos y le 
pro pore ion a ra vuelcos en pant alia de todo su tra- 




-_ : _- graficos en alta resolution. Para cjecutar 
lodo esto necesitara un Sirius de 256 K. 

Los sistemas de alcantarillado parecen haber 
ppoporaonado a los program ad ores much] si mo es- 
t&nalo El robusto ordenador de mano Husky es el 
: U 7: CAMIL 'Computer-aided 

nwmnhaie inspection and hcmion), desarrollado en 
Sam&atapoam y qoe ahora estan aplicando en toda 
t las auioridades de aguas. El progra- 
: qac te inspectores entren datos en el 
: sean transmitidos a trav6s de 

, a los ordenadores centrales, que 
. imprimir trazados de las cloacas, 
= :: puede incluso responder a una pcti- 

rioo para ver "todas las cloacas de ladrillo construi- 
das antes de 1900"; y de estas hay una cantidad 
ibrumadora. 

res de comercio les result ara suma- 
BCBte uril la serie de programas "Travelling" que 
k z ecntan en otro ordenador de mano; el excelen- 
f NBC PC^S301. Ademas de paquetes basicos 
> a TwmeSmg mrmer lescritor viajante : un pro- 
ipmadacsvinfioniies. con capa- 
■ ii ifcilHBMii y MhiiMi'li m win de 
^rst _~c_.- - 7s z- Ti ; -v; 

expense manager (admimstiador de pnyyectos . de 
oK2^ de Veritas y de gastos, respeefcvameme). 

Las %eodedores tambien pueden mejorar sus tec- 
&^de venta con el modulo Sales Edge del juego 

i: r: Human edge. Estos son distribuidos 

porTbom EMI para el IBM y el Apricot. El modu- 
: S.:"e: Edge evalua los puntos fume* y los puntos 




debiles del usuario de cara a la venta mediante una 
serie de preguntas y respuestas del tipo acuerdo/de- 
sacuerdo; tras una serie similar de preguntas al 
cliente, sugiere una estrategia de venta con manio- 
bras de lL apertura" y i4 cierre". 

Si piensa invertir en divisas, quiza sienta la tenta- 
cion de adquirir el Forextend de Forexia, que le 
permite estudiar y analizar lo que esta sucediendo 
con el dolar, la libra esterlina, el franco suizo, el 
yen japones y el marco aleman. El programa pro- 
duce 37 graficas de comparaciones, indicadores re- 
lativos de robustez, tasas de interes e indices de in- 
fluencia comercial para cada dia del periodo entre 
el 1 de octubre de 1983 y el dia actual, 

Los programas de citas y horarios estan, asimis- 
mo, adquiriendo gran popularidad. La mayoria de 
los ordenadores tienen relojes incorporados, pero 
pocos de ellos pueden inter rumpir cualquier activi- 
dad que el usuario este desarrollando para recor- 
darle donde debcria estar en ese momento. No obs- 
tante, el planificador de horarios basado en ROM 
de Hewlett-Packard para su HP-75C hace exacta- 
mente eso y. ademas. con toda una variedad de so- 
nidos de aviso diferentes. 

En el proximo capitulo de esta serie analizare- 
m&s en profundidad el BrainSiorm. un programa 
del cual se afirma que organiza sus pensamientos 
de la misma manera en que un procesador de textos 
organize sus oraciones, Y, por consiguiente. anali- 
zarernos paquetes de software para personas dedi- 
cadas al comercio, la medicina, la education, la in- 
vestigation, el periodismo. el derecho, el video, los 
espectaculos y la publicidad, con casos concretos de 
usu ari os e spe c lfi cos . 



Perfiles de me re ado 

El software se escribe para 
satisfacer las necesidades de 
Qrupos de usuarios primarios y 
para venderlo en los sectores 
fundamentales del mercado. El 
grueso del mismo,. por lo tanto, 
comprende en gran parte 
paquetes financiers, de 
tratamiento de textos y de base 
de datos; una cuarta area, la del 
diseno asistido por ordenador 
(CAD: Computer-aided design), 
esta creel en do en importancia. 
En el diagrama, estas areas de 
aplieaeiones seyuxtaponen a 
una seleccidn de usuarios. El eje 
vertical represents el nivel de 
compLejidad de la aplicacibn, 
estando los metodos mantiales 
en el nivel inferior, el software 
para ordenador de uso general 
en el nivel medio, y el software 
dtsenado a medida o con fines 
especificosen el nivel superior. 
Los perfiles de uso resultantes 
muestran que el software para 
fines generales suele adaptarse 
bien a las exigencias 
empresariales, pero que los 
usuarios necesitan adaptar a su 
medida los paquetes o bien 
crearse los suyos; los perfiles 
alto-bajo irregulares mdican una 
descompensacion entre las 
necesidades y los recursos, los 
perfiles dealtura media 
regulares muestran la capacidad 
del mercado paraequilibrar 
necesidades y clientes 



Visiones 
verticales 
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Programacion Juego de aventuras 

Tomar y llevar 

Prosiguiendo con nuestro juego, desarrollaremos las rutinas 
necesarias para recoger y transportar objetos entre escenarios 



En el ultimo capitulo de este proyecto vimos el ana- 
(isis de las instructions y disenarnos un grupo de 
instrucciones "normales". En este grupo incluimos 
las instrucciones RECOGER y DEJARL junto con sus 
variantes COGER y POWER, Una vez reconocida la 
instruction apropiada, podemos construir las ruti- 
nas que obedezcan la instruccion, En primer lugar 
vamos a considerar RECOGER. 

Para entender los metodos que emplea la rutina 
RECOGER, resurnamos la forma en que el programa 
lleva el registro de los objetos de nuestro mundo de 
aventuras- En el primer capitulo del proyecto dise- 
namos sentencias DATA para cada escenario que 
contenian descripcioncs del mismo, los nombres de 
los objetos presentes e information sobre las sali- 
das posibles. Despues de leer los datos, la matriz 



IVS(,) (utilizada para almacenar los datos de los 
objetos de El basque encantado) posee el siguiente 
contenido: 



Test objetivo 



El diagrama de flujo de la 
rutina RECOGER muestra las 
comprobaciones que realiza la 
sub rutin a sobre ia sentencia 
entrada pore! jugador. La 
prueba de validez busca una 
pareja entre las palabras 
entradas per el jugador y los 
objetos del inventario. 




Entonces tiene lugar una 
condiciort para asegurar que 
el objeto en question este en el 
escenario actual del jugadon 
Por ultimo, antes deque se le 
permita a este recoger el 
objeto, se efectuauna 
com probation para verificar 
que el jugador no este ya en 
posesion del numero maximo 
permitido de objetos 



c 
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Borrar puntero position de IVS(,) 




N 


1VS{N,1) 


IV$(N,2) 


1 


ESCOPETA 


10 


2 


FAROL 


9 


3 


LLAVE 


5 



La primera columna de la matriz contiene el nom- 
bre del objeto, mientras que la segunda contiene el 
numero de su escenario initial en el mapa del 
mundo de aventuras, Durante la description de 
cualquier escenario, se explora la segunda columna 
de esta matriz para ver si cualquiera de los objetos 
se halla en el escenario actual del jugador, P. Cuan- 
do este desea recoger un objeto de un escenario, 
utilizando una instruccion ajustada al formato RE- 
COGER EL OBJETO. se deben considerar varios fac- 
tores; 

• lEs valido el objeto de la instruccion?; en otras 
palabras. ^aparece en la matriz del inventario, 
IVSQ? 

• ^Esta presente el objeto en el escenario actual 
del jugador? 

• ^Posee ya este la cuota completa de objetos que 
permiten las reglas del juego? 

Si se puede responder satisfactoriamente a estas 
preguntas, entonces el jugador puede recoger el 
objeto. Esto implica anadir la description del obje- 
to a la matriz de objetos personates del jugador, 
ICS(), y borrar el mdicador de position de la entra- 
da correspondiente en iV$(,). Observe que el nom- 
bre del objeto no se tiene que borrar. Si utilizamos 
un indicador de position de —1 para cada objeto 
que se hay a recogido y transportado, tales objetos 
no apareceran en las descripcioncs de los escena- 
rios. Sena muy curioso coger la ESCOPETA en el es- 
cenario 10, despiazarse hasta el escenario 9 y des- 
pues otra vez hasta el 10, para encontrarse al regre- 
so con que la ESCOPETA todavta esta alii. Por lo 
tanto, la matriz IV$( S ) lleva un registro de las posi- 
clones de todos los objetos que el jugador no esta 
llevando consigo. El diagrama de flujo para la ruti- 
na RECOGER muestra la sencilla logica que se debe 
aplicar* 

3700 REM S/R RECOGER **** 
3710 GO3UB5300:REM ES VALIDO EL OBJETO 
3720 IF F=QTHEN SNS = "N0 HAY NINGUN "+W$:GOSUB5500: 
RETURN 

3730 0V=F:G0SUB5450;REM COMPROBAR INVENTARIO 
3740 IF HF=1 THEN SN$="TU YA LLEVA5 " + IVS(F 1 1):G0SUB 5500: 
RETURN 

3750 : 

3755 REM " ESTA AQUI EL OBJETO ?** 

3760 IFVAL(IV$(F,2))<>PTHENSN$-IV3(F,1) + " NO ESTA 

AQUI " :G0SUB5500: RETURN 
3770 : 

3780 REM * * ANADIR OBJETO A LA LISTA ** 

3790 A=0 

3800 FOR J=1 T02 
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- m £ _ = -"THENICS(J) = IVS{F.1):AF= J :J = 2 

mm next j 

WHO REM " * QUOTA COMPLETA * ' 

3850 IF AF=0THEN PRINT YATIENES :: S :i_ "5": RETURN 



:- r s- = e : : i e £ - . = - ■ ::s_E:5i: 

i (VS(F^*= * -1 * :Rai BORRAfi BfTRADA UiVENTAR tO 

; ■ una estas tres con- 



La prueba de validez 

De ties caraprobaciones, la mas complicada e 
rapoftam e es la prueba de validez. En su forma 

Mrr.ple. poena scr una rutina quo si' limita- 
ra a tomar la segunda parte de la instruction des- 
. . } compararla con cada uno de los ele- 
ments de la matriz del inventario, iV$(,). Sin em- 
bargo, si fuera este el case, la instruction RECOGER 

ria limttada a la estructura rigurosa de RECO- 
GER OBJETO. toctoso variariones tales como REC0- 
B _- E:~~ : :~- ss iceptabks. puesto que 

E; : E 

t la esa y a nra de 
b i Bst na xioa RECOGER hemos de desauofar on 
metodo mas so&ocado pan Donpam .2 KflMifa 




pane de la instruction dada con d nrcotano de 

objetos. 

El procedimiento mas evidente para aumentar la 
fcribiBdad consiste en dividir la segunda parte de 
feinsmjcrion dada en las palabras que la componen 
> hiego comparar cada una de ellas con el inventa- 
rio de objetos. Si bien con ello solucionanamos el 
problema esbozado anteriormente, este metodo 
tarnbien tiene sus inconvenientes. Si, por ejeinpkx 
qmseramos utilizar una descripcion de dos pala- 
te para un objeto, como CUCHILLO GRANDE, en- 
tooces utilizando este metodo la instruccion REC0- 
: : = EL CUCHILLO GRANDE no tendria pareja. La ru- 
tina compararia las palabras EL, CUCHILLO y GRAN- 
DE por separado con la lista del inventario, Este 
it:': 7-... :t v solve ntar haciendo que la rutin a 
se2 mas refnada. En vez de buscar una pareja 
l ffafiiar una rutina que explorara 
1 de ob yios del inventario para la 
exanaoaado. 
iz . r. : rr. r r t 




Uni >z7\i - ::re:e c. z'^caz -,1 ~^re _ 
entre instruccion e inventario de esta maoera. es 
que se pueden dar en la instruccion versiones abre- 

_i^s dc la palabra objeto. En el ejemplo de ani- 
ba. la instruction RECOGER EL CUCH tambien for- 
maria la pareja cor recta, suponiendo que antes de 
CUCHILLO GRANDE no hubiera en el inventario nin- 
gun otro nombre de objeto que tuviera la combina- 
tion de letras CUCH, De ser asi, entonces se forma- 
na una pareja incorrecta con la entrada anterior del 
inventario. Los problem as de este tipo forman 
pane del precio que se debe pagar por la mayor 
fiexibilidad de la rutina. La mayoria de los proble- 
mas de emparejamiento incorrecto se pueden eli- 
minar mediante una cuidadosa selection de los 
n ombres de los objetos. Si dos nombres de objeto 
deben contener el mismo grupo de caracteres, o si 
un nombre es una subserie de otro (como SOL y 



La gran coincidencia 



"^jaf* M^jajj jbjjj* 
jga» flM^ltf^j |fl^ fl=» ajp| WSL 



^..m. . Ijla . jiu, .uml lyiiiuuui ^UMMMWU ^U|MUM| 

flfc fill CC r ONK 



10 REM * * " DEMOSTRACION EMPAREJAR UN OBJETO ' 
40 M0DE5:C0L0UR2;DIM VS{3 
60 FOR 1-1 TO 3:READ Vffi(i):WEXTi 
90 A£= "THE " :BS= " KNtFE M :CS— "KNI 15 

110 MS=AS:GOSUB 1000:REM EMPAREJAR "THE" 
130 MS=BS:G0SUB 1000:REM EMPAREJAR "KNIFE" 
150 MS=C4:G0SUB 1000:REM EMPAREJAR "KNI" 
160 END 

1000 REM S/R EMPAREJAR 

1010 CLS:F=0:LW=LEN(M$) 

1030 FOR J = 1 TO 3:LI = LEN(VS(J))i 

1042 X=1:Y=6:GOSUB 2000:PRINTSS 

1045 X=1:y=6:GOSUB 2000:PRINTVE(J) 

1047 FOR 1 = 1 TOLI-LW+1 

1050 X=1:V-5:G0SUB2000:PRINTSS 

1060 X=LY=5:GOSU6 2000:PRINTMS 

1070 lFMIDS(VS(J).f.LW)=MSTHENF=l:l = LI:J=3 

J D"= FOR D=1 TO'300:NEXT D.I'REM DEMORA 

: : . ~-i ::2.~2f:: 



La subrutina de prueba de 
validez disenada para utilizar 
junto con la rutina RECOGER 
explora la sentencia entrada 
de palabra en palabra, 
tratando de hallar una pareja 
con una entrada del 
inventario. Esie breve 
prograrna i lustra la forma en 
Que la rutina de validez va 
buscando una pareja a lo largo 
del inventario. Para esta 
demostracion, en el inventario 
hay tres objetos, y el 
prograrna intenta em pa re jar 
las palabras "THE", "KNIFE" 
y " KNl", Cada vez que se 
encuentra una pareja, el 
programa espera que se pulse 
una teda antes de seguir 
adefante 



:M DEMORA 



RED DOOR"," LARGE KNIFE" 



£3\L rUH 0=1 lUbc a:/ 
2520 AS=GETS:C0L0UR2: 

3000 REM DATOSINV 

3005 DATA "SMALL FORK" 



10 REM PAREJA SPECTRUM 

40 INK6:DIMVSf3.20} 

1070 IF VSfJJ TO KLW-1) = MUHEN F-I:I=LI:J=3 

2010 PRINT AT {Y.X)::RETURK 

2502 INK2:X=F:Y=6;GOSUB2000:PRINTSS 

2520 AS = INKE V$:IF AS= " ' THEN 2520 

2525 INK 6:RETURN 

10 REM "* PAREJA CBM B4 * # 

40 PRINT CHRSf158);DIMVS(3] 

50 ONS=CHRS(17J:FORK=1TO 

5:DNS = DNS+DNS:NEXT:DNS=CHR$(19) + DNS 
2010 PRINT LEFTS(DNS,Y}TAB(X);: RETURN 
2502 PR INTCH RS(28) :X= F: Y= 6:'60SUB2000:PRI NT SS 
2520 GETA$:IF AS= " " THEN 2520 
2525 PRiNT CHRS(158):RETURN 
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Programacion/Juego de aventuras 



SOLDADO), entonces el mas corto de los dos nom- 
bres se debe colocar en un lugar anterior en la ma- 
triz del inventario. Ademas, no se deben utilizar 
deseripciones de objetos diferentes que contcngan 
las mismas palabras, como CUCHILLO GRANDE. 

5300 REM S/R0BJET0 VALIDO 

5310 NNS = NNS + "' ":LN=LENfNNSVC^1:F=0 

5315 FOR K=1 TO LN 

5320 IFMIDS(NNS.K,1)<>" * THEN NEXT K:RETURN 
5325 W$=MIDS(NNS,C,K-C1:C = — ' 
5330 LW-LEN(WS) 
5335 FOR J = 1 TO 3 

5340 LI-LEN(IVS(JJ)):REIiL0llGlTUODaOBJETO 
5350 FOR f=1 TOU-LA 

5360 JF MIDSflVSfJ T).<.LW=WSTHEN F=J:f=UJ=3:K=LN 
5370 NEXT U K 

Habiendo balJado una pareja. la rutina establece la 
variable F como el elemento de la matriz del inven- 
tario que corresponde al objeto de la instruction. 
De no hallarse pareja. el valor de F permanece en 
0. indicando que tal objeto no existe en ei juego. 

^Esta presente el objeto? 

Una vez se ha establecido el numero de matriz del 
objeto me di ante la subrutina de prueba de validez, 
el escenario del objeto se puede cote jar facilmente 
con la variable de escenario actual, P. El objeto a 
recoger esia en IV$(F t 1) y su situation esta en 
IV${F,2). La Hnea 3760 de fa rutina RECOGER de El 
bosque encantado compara este valor con el de P. 
No obstante, el mensaje de error generado ("el 
OBJETO no esta alii") podria no ser estrictamente 
correcto, El objeto podria estar presente en el esce- 
nario actual, pero en manos del jugador Por consi- 
guiente, se debe efectuar una comprobacion para 
ver si este transporta consigo el objeto en cuestion 
antes de generar el mensaje de error. De ser asi, se 
puede producir un mensaje de error diferente 
(como 'Tu ya tienes el OBJETO"). La siguiente 
subrutina verifica el inventario principal y establece 
un indicador, HF, a uno si el objeto lo lleva consigo 
el jugador. Esta condition se indica mediante un 
—1 en el elemento correspondiente de la matriz. 

5450 REM **** S/R TIENE EL JUGADOR EL OBJETO 
5460 HF=0 

5470 IF IVS(OV,2)= 4, -1 M THEN HF=1 
5480 RETURN 

Comprobacion de la lista 

Estas dos tare as de verificar si la lista del jugador 
esta completa y anadir a la lista se pueden combi- 
nar, Utilizando la matriz IC${) para retener los 
objetos transportados, se puede emplear un bucle 
FOR,. ►NEXT para localizar el primer espacio libre de 
la matriz, de modo que se pueda entrar el nuevo 
objeto, Segun las reglas de El bosque encantado, el 
jugador solo puede transporta r dos objetos en cual- 
quier momento dado. Por lo tanto, el bucle FOR- 
...NEXT utilizado solo se ejecuta dos veces, De ha- 
llarse un espacio libre, entonces se entra el nuevo 
objeto; si no, sale en la pantalla un mensaje indi- 
cando que el jugador ya ileva consigo dos objetos, 

La tarea final consiste en borrar el puntero de 
position del objeto red en recogido del inventario, 
Esto se realiza poniendo IV$(F f 2) a -1. 

Ahora que el jugador tiene capacidad para reco- 
ger objetos, podemos incluir otra instruction. Suele 
ser util que el jugador pueda ver que objetos esta 
Iran sport an do, Por ejemplo, si se encuentra con 



una puerta cerrada con Have, puede haber olvidado 
que 20 movimientos antes recogio una Have. Permi- 
tir que el jugador liste los objetos que lleva consigo 
es una ayuda util para la memoria. La codification 
requerida es simple: se emplea un bucle FOR, ..NEXT 
para visualizar el contenido del inventario de obje- 
tos del jugador, JC$(). 

4100 REM **** LISTAR INVENTARIO TRANSPORTAD0 
4110 PRINT" OBJETOS QUE LLEVAS CONTIGO:" 
4120 FOR 1=1 TO 2 
4130 PRINT' 1 ';IC$(I) 
4140 NEXT I 
4150 RETURN 



Listados Digitaya 

2140 REM ""S/R RECOGER **** 

2t45 fVS(4,1)=- I BJLL£TEALTRIESTAD0 M 

2-51 3CS. = r*C :S VALIDO EL OBJETO 

2160 IF F=0 THENPfilNFNO HAY N1NGUN 11 ;WS: RETURN 

2170 REM " YA SE HA RECOGIDO EL OBJETO 7 * * 

2180 0V=F:G0SUB5830 

2190 IFHF=1 THEN SNS=-Ti;YA TIENES 

EL ' +IVS(F,1);GOSUB5880:RETURN 
2200 : 

2210 REM " ESTAAQUI EL OBJETO 

2220 rFVALflVS(F,2)}<>PTHENSNS = IVS(F,1) + "N0ESTA 

AQUI":G0SUB5B80:RETURN 
2230 : 

2240 REM * k ANADIR OBJETO A LA LISTA * * 

2250 AF^G:F0RJ=1T04 

2260 )FlCS(J)-"THENICS(J) = IV$(F,1j:AF-1:J=4 

2270 NEXT J - ' 

2280 : 

2290 REM * * COMPROBAR SI CUOTA CUBIERTA " 
2300 IF AF=0 THEN PR I NT "YA LLEVAS CUATRO OBJETOS' 1 ; 
RETURN 

2310 : 

2320 SNS= RECOGESEL H + IVS(F,1):GOSUB5880 
2330 IV$(F,2)^-1 ":REM BORRAR ENTRADA POSICI0N 
2340 RETURN 

5730 REM "" S/R OBJETO VALIDO *"* 
5740 NNS=NNS+" ":LN=LEN(NNS):F=0:C=1 
5745 FOR K=1 TO LN 

5750 fFMIDSfNNS,K f 1)<>" 11 THEN NEXTK: RETURN 
5755 WS^MjDS^NS,C,K-C):C=KH-1-LW-LENfWS) 
5760 FOR J=1 TO 8 

5770 LI = LEN(IV$(J,1));REM L0NGUU0 OBJETO 
5780 F0RI=1T0LI-LW+1 

5790 IFMIDS(IVS(J,1),I,LW)«W$THENF»J:I«LI:J=8:K=LN 
5800 NEXT I J. K 
5810 RETURN 
5820 : 

5830 REM " " S R LLEVA JUGADOR EL OBJETO 

5840 HF=0 

5850 !FfVS(0V.2)^--rTH£NHF-1 
5660 RETURN 

2540 REM **** S/R LISTAR INVENTARIO 
2550 PRINT" OBJETOS QUE LLEVAS CONTIGO: H 
2560 FOR 1 = 1 TO 4 
2570 PRINT" ';IC$(h 
2580 NEXT I 
2590 RETURN 



Complementos al basic 

Spectrum: 

En el listado de El bosque encantado, introduzca las 
siguientes modificaciones: 

SustituyaSNS porSE, IV$(.) por VSfJ, IC$() por 
ISO y NNS VS( B ) por R$. 

5320 IF R$(KT0 K)<> 11 " THEN NEXTK:RETURN 
5325 LETW$=R$(CT0K-1) 
5360 IF VStl TO l + LW-1)=W$THEN LET 
F=J:LET l = LI:LET J=3:LET K-LN 

En el listado de Digitaya, reemplace los nombres de 
las mismas variables en serie e introduzca Jos 
mismos eambios indicados arriba, pero para las 
Imeas 5750, 5755 y 5790, respectivamente 



)sborne Encore/Hai 



Jugada audaz 



He aqui un nuevo e interesante microordenador "de regazo": el 
Osborne Encore, compatible con el IBM-PC 



Al haber sido el primer ordenador portatil todo en 
uno, el Osborne- 1 marc6 cl inicio de una revolu- 
cion en la microinformatica. Equipado eon un mo- 
nitor incorporado, unidades de disco gemelas e in- 
terfaces para modems e impresoras, la maquina fue 
el primer ordenador de oficina CP/M autoconteni- 
do. Si bien la calif ieaeion de " portatil 1 ' qui /a hay a 
sido un tanto exagerada (el Osborne-1 pesaba 10,5 
| z . otras firm as inform aticas comprendieron muy 
rapftdamente d potencial de la nueva maquina, y su 
ttricaofc. la eny r esa norteamencana Osborne 
i vez de veise en un campo propio. 
rcoeada de axoperidores. 
Em 1981 fa — 1 1 qqnesa t&d»6 un dure golpe 
il lfwmrrir fITM rl H mi mm »n rlrl prirnrr nr-H^ 
de su gama Personal Computer. La nuei i mmmWaa 
enseguida barrio a todas las otras, porque los horn- 
?'r- de negocios se apresuraron a adquirir e! mode- 
io del conocido gigante de la industria informatica. 
. junto con muchos dc sus competidores, 

ammdo rapidamente el inminente lanzamiento de 
una maquina compatible con el IBM-PC. Este 
nuevo modelo, el Osborne Executive, iba a estar 
equipado con proces adores dualcs, lo que le permi- 
tiria ejecutar tanto software CP/M como MS-DOS, 
Sin embargo, debido a la escasez mundial de micro- 
rrocesadores S0S6, la maquina salio al mercado sin 
d chip necesario para que fuera compatible con el 
IBM-PC, A consecuencia de ello, las ventas de los 
mieroordenadores Osborne descendieron brusca- 
mente y la firm a norteamencana sc vio obligada a 
presentar liquidation voluntaria en el verano de 
1583. Per© Osbooie logro sobrevivir y el estiio de 
> de fa nueva empresa es hoy similar 
[i Gran Bretana. orient a da 
Il ■ n ■ ii i n i 1 il iiiriMn 





: d Osborne Encore. Es 

j -i 

i d ne»oo A pesar de 
ser tan *iw|mij oono uthmmas como d 
Epson PX-S, la rniponanda del Encore radica en 
su intento por cubrir el vaci'o que existe en el mer- 
cado de gestion entre el sector de maquinas "de re- 
g^zo" y el de las de escritorio. 

Con un peso de 6 kg, el Encore es mucho mas 
ligero que su predecesor. El teclado se cierra contra 
!a pan ta 11a, conform an do una caja compact a cuyo 
tamano es aproximada mente el de tres listines tele- 
fonicos. La carcasa es de plastico duro de color azul 
y el teclado se mantiene en su sitio mediante un par 
de clips. 

El teclado consta de teclas QWERTY tipo ma- 
quina de escnbir, encima de las cuales hay una 
membrana plastica que comprende las teclas de 
funcion y los "iconos" ( si m bo los que representan a 
los programas incorporados). En el cuerpo princi- 
pal del ordenador propiamente dicho hay una pan- 



talla de visualization en cristal liquido que mide 
23,7 x 8 cm. 

El teclado ofrece un tacto solido y profesional, 
con las teclas de control a ambos lados y cuatro te- 
clas para ei cursor en el extremo inferior derccho. 
El disefio del teclado es muy apretado y esto, sin 
duda, es consecuencia de incluir en un espacio tan 
limitado todas las caractensticas del IBM-PC. En el 
lado derecho del IBM hay un teclado separado que 
proporciona las funciones dc calculadora. Para 
mantener la compatibilidad en el Encore, estas te- 
clas se han incorporado en el cuerpo principal del 
teclado. Las funciones de calculadora estan marca- 
das en color azul. contrastando con el etiquctado 
bianco de las teclas alfanumericas estandares. A la 
calculadora. asi como a los otros programas incor- 
r.:_-:? Zzl Encore, >c accede pulsando el icono 
adecuado en el panel que hay encima del teclado. 
Los iconos del Encore representan las rutinas dc 
calculadora, modem, disco y calendario. 

EI panel sensible al tacto no esta tan bien disena- 
do y no posee el mismo tacto profesional que ofre- 
ce globalmente cl teclado, Las teclas de funcion 
(que en el IBM-PC estan situadas aparte, en el sec- 
tor izquierdo) poseen el mismo tipo de tacto que el 
teclado del ZX8L A pesar de que uno puede perci- 
bir el "pop"' de la membrana de burbuja por debajo 
del panel, las teclas carecen de la firmeza del tacto 
de un teclado adecuado. 

Con la incorporation de una pantalla LCD, los 



Paquete compacto 

El Osborne Encore es una de las 
primeras maquinas compatibles 
con el IBM-PC que viene 
equipada con una visualizacion 
LCD en lugar del tubo de rayos 
catddicos estandar. Cuando no 
se lo uiiliza, el teclado se 
repliega contra la pantalla, 
conformando un paquete muy 
compacto quese puede 
transportar mediante fa correa 
suministrada para colrjar del 
riombro 
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discn adores han efectuado el mayor ahorro en 
cuanto a consumo de energia, dado que una visuali- 
zation en cristal li'quido utiiiza muchisima mcnos 
electricidad que el habitual tubo de rayos catodi- 
cos. Es aqui do ride sc pre sen tan los problemas mas 
grandes de compatibilidad con el IBM-PC. No es 
que la pantalla LCD carezca de colores, puesto que 
estos se pueden sustttuir facilmente variando la to- 
nal id ad de los graficos: es el tamano de la pantalla 
lo que const it Li ye cl principal ineonveniente, 

La pantalla IBM normal tiene una resolution de 
texto de 80 por 25 caracteres; pero, debido a pro- 
blemas de desarrollo que se !cs plantearon a los fa- 
bricantes japoneses de la pantalla para produeir la 
%isualizaci6n LCD equivalents , Osborne se ha visto 
obligada a introducir el Encore con una visualiza- 
cion de SO por 16. Esto significa que muchos paque- 
tes escritos para el IBM no se podran utilizar con el 
Encore. Esto no represents ningun problema para 
los programas que desplazan sus lmeas en la panta- 
lla, pero en los paquetcs en los cualcs la visualiza- 
tion est a "paginada". el usuario puede tropezar con 
serias dificultades, cspecialmente teniendo en cuen- 
ta que los mensajes aparecen por lo general en la 
parte inferior de la pantalla. 

El lado dcrccho del ordenador se ha preparado 
para un par de unidades de disco flexibles de 5 Va 
pulgadas, si bien el modelo estandar viene equipa- 
do con una unica unidad. En el lado opucsto esta el 
collector de potencia para el transformador, un in- 
terrupter on/off, una peril la para regular el eontras- 
te de la pantalla y la caja de las pilas, que puede 
albcrgai- un paquete especial de pilas de niquel- 
cadmio para poder hacer funcionar la maquina 
cuando no se tiene acceso a un enchufc electrico. 

En la parte trascra del Encore est an las puertas 
de E/S. De izquierda a derecha, estas comprenden 
un enchufe hembra telefonico para conectar el 
modem incorporado del Encore, una puerta Cen- 
tronics para conectar en interface con una impreso- 
ra y una puerta en serie RS232 para conectar con 
dispositivos eomo impresoras en serie y modems. 

Para cargar el sistema desde el disco MS-DOS 
basta pulsar el icono del disco en teclado sensible al 
tacto. Los programas incorporados se pueden eje- 
cutar en cualquier momento, independientemente 
dc que program a se este ejecutando en ese momen- 
ta en la unidad de disco. 

El ordenador leyo todos los discos de programas 
IBM que se cargaron en el Encore. No obstante, 
debido a las restricciones de la pantalla, resulto difi- 
cil detectar si los programas se esta ban ejecutando 
correctamente, dado que muchas de las instruccio- 
nes se entraron "ciegas". Entre los programas que 
el Encore consiguio cjecutar con total cxito estaba 
el Lotus 1-2-3: un program a dificil de cjecutar en 
cualquier compatible debido a la forma en que ac- 
cede a las rutinas incorporadas del IBM. 

Resulta dificil decir si el Encore se con vert ira en 
una maquina eon tanto exito como el Osborne-1. 
Acostumbrarse a la pantalla lleva algo de tiempo ya 
que, al igual que todas las visualizaciones LCD, ne- 
cesita una luz muy intensa para produeir caracteres 
que scan sutitientemente legibles. Este es un pro- 
blema irrelevante en maquinas de regazo con carac- 
teres grandes, pero el tamano de los tipos del Enco- 
re es de apioximadamente la mi tad, y es dificil 
saber si muchos usuarios que ruin mvertir el tiempo 
necesario en acostumbrarse a la visualization. 



Altavoz 

Las indicaciones de la 
se acorn pan an con un 
beep 




Pantalla - 

LCD 

La visualization en crista! 
iiquido permite que el Encore 
consurna muchisima menos 
potencia que una maquina 
provista de un tubo de rayos 
catbdicos estandar, haciendo de 
esta maquina compatible con el 
IBM y que funciona a pilas una 
propuesta realista 




Duplicando 

El teclado del Encore posee 
menos tecias que el IBM-PC, 
pero ofrece las mismas 
funciones. Para conseguirlo, 
algunas de las tecias {senaladas 
con inscfip ciones en azul) 
tarn bien sirven como tecias de 
calculation 




Desventaja 
del disco 

Las unidades de disco (se 
pueden instalar unidades de 
disco dobles o bien una sola) 
estan situadas a uno de los 
iadosde la maquina. Ello 
contribuye a hacer del Encore 
un paquete muycompacto, 
pero el usuario se ve forzado a 
estirarse para insertarun 
disco o comprobar si se esta 
accediendo a la unidad 
adecuada 
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Osborne Encore/Hardware 



Entrada de potencia 

Un transform ado r externa 
permite utilizer la energia de la 
red electrica 



PCB principal 

Esta placa de circuito impreso es 
una pruebadel den so 
empaquetamientc quese 
necesita para hacer caber en un 
espacio tan pequeno lo$ 512 K 
dememoriay otras 
caracteristicas 




^ : ^eden instalar unidades de 
ascodobies o bien una simple. 
Ucarcasa metalicaalrededor de 
isun dades actua a modo de 
z s cador 



Pueria 

para impresora 

La puerta en paralelo Centronics 
lo conecta a una impresora 



Puerta 
RS232 

Conecta al Encore con un 
modem externo para 
comunicaciones 



ol de tiempo 

otografia vemos la pantalla LCD de 80 x 16 caracteres. 

> de debajo de la pantalla haran posible instalar una 
acion de 80 x 25. Tambien se puede observar el 
rio/diario, que permite al operador entrar las futuras citas 
r la ftora en cualquiera de las zonas del mapamundi 




Sensible al tacto 

Encima del teclado principal hay un teclado sensible ai tacto 
(similar al teclado del Spectrum y del ZX81) que contiene las 1 0 
teclas de funcion programabies. Oebajo de estas estan los iconos 
quese utifizan para llamar a los programas basados en ROM 



OSBORNE 
ENCORE 




Visualization LCD de 80x16 
caracteres de 480x128 pixels, 
Osborne ha anunciado una 
pantalla de 80x25. Se las ha 
prometido a los iisuarios una 
actuafizacitin economica para 
incorporar la pantalla mas grande 



Interface en serie RS232, 
enchufe hembra telefdnico RJ11 
y puerta en paralelo Centronics 




po maquina de 
escribir y un teclado que 
contiene 10 teclas de funcion y 
cuatro teclas de iconos 



Las dos guias para el usuario 
estan, como todos los manuales 
de Osborne, notablemente bien 
escritas; ofrece una completa 
explicacion acerca de como 
utilizar la maquina y contiene 
muchisimos ejemplos 



Es una maquina sumamente 
potente y com pacta que puede 
operar a pilas entre cuatro y 
cinco horas 



La pantalla todavfa no es 
totalmente compatible con el 
IBM-PC y puede resultar dificil 

de teer 



1331 




Juegos 



Robots 



listed se encuentra solo, abandonado en un desconocido planeta 
def endido por robots asesinos. He aquf un emocionante programs 
para el micro Thomson TO 7 



Las minas estan rep re sent ad as en la pantalla me- 
diate rombos rojos, Al comenzar el juego, einco 
robots se hallan sobre el terreno. Sin perder un se- 
gundo, se precipitan hacia usted. siguiendo siempre 




el camino mas corto. For suerte los robots son cie- 
gos y no pueden ver las minas situadas entre Listed y 
ellos, io coal le permitira, siempre que se desplace 
adecuadamente, eliminarlos. Para ello utilice la pa- 
lanca de mando o las teclas 

< A > < Z > <E> 

< Q > < D > 
<W> <X> <C> 

segun la direction elegida por usted. Cuando haya 
eliminado a todos los robots, el juego continua con 
un robot suplementario. Si salta sobre una mina o 
un robot le mata, aun no esta todo perdido. En 
realidad tiene cinco vidas. Si desea cambiar el nu- 
mero de minas, modifique el valor de la variable 
NM en la lfnea 80. 



ROBOTS 



10 REM 
20 REM * 

3D REM * " 

40 DEFINTA-Z 

50 CLEAR „3 

60 NH-5 

70 N1=5 

80 NM=40 

90 NR=N1 
100 DEM R(30,1) 
110 GOSUB 158D 
120 GOSUB 1470 
130 GOSUB 910 
140 ON JS GOSUB 710,810, 
150 C=POINT(HX'fl+4,HY'8+4) 
160 IF Co- 3 AMD C<>4 THEN 470 
170 COLOR 4 
180 LOCATE X,Y 
190 PRINT NS: 
200 LOCATE hfX.HV 
210 PRINT HJ; 
220 X=HX 
230 Y=HY 
240 T=0 

250 FOR 1=1 TO NR 

250 IFR(t,0)=0THEM40O 

270 T=1 

2S0 RX=Rtl,0)+SGM(HX-Rfl,0)) 
290 RY- R[U )+ SGN HY- Rfl ,1 H 
300 C=FWJT(RX*6+4,RY'8+4) 
310 IF C- 1 OR C=0 THEM S= S+1 : LOCATE 

R(l,0),fi(l.1):PfifNT NS;:ft(LO)=0;GOTO 400 
320 IF C=4 THEN 470 
330 COLOR 0 
340 LOCATE (R(l>0),R(j,1) 
350 PRINT NS; 
360 LOCATE flX,RY 
370 PRINT RS; 
380 Rfl,0t=RX 
390 Ril,l)=RY 
400 NEXT I 
410 IFT=0 THEN 430 
420 GOTO 140 
'430 5=5+10 

440 If INKEYSo"" THEN 440 
450 IF NR<30 THEN NR-NR+1 

::r :. •: 

470 NH = NH— 1 
43 D COLOR 7 
490 LOCATE X r Y 
500 PRINT NS: 
51 C .OCATE HX.HY 
520 PRINT HS; 

530 PLAY ' L96 REL7 2 RE L2 4R E L96 REL72FAL24 Ml 
L72MIL24RE,72REL24D0*L96RE" 



540 IF INKEYSo"* THEN 540 
550 IFNH>0THENNR-«VGOTO13O 
560 CLS 

570 SCREEN 1.6. 6 

580 ATTRB 1.1 

590 LOCATE 9,10 

600 PRINT •PUMTUACIOS :S 

610 LOCATE 9.20 

620 PRINT "OTHA ?": 

630 COLOR 4 

:-: ' : : 

650 EF iNKEYSo"" THEN 650 

660 DS=IKKEYS 

670 IFDS="'"THEN 660 

680 IFD£o"M" THEN RUN 

690 CLS 

700 END 

710 DS=INKEY$ 

720 3F DS="A" THEN HX=HX-1:HY=HY-1 

730 IF DS= J 7' h THEN HY=HY-1 

740 IF DS-"E" THEN HY=HY- 1 :HX= HX+ 1 

750 IFDS="0 ThEKHX=HX-1 

7§D JFDS="D" THEN HX-HX-r1 

77D IF DS= H W" THEN HX=HX-1:HY=HY+1 

7S0 IF QS="X" THEN ri> — HY— 1 

790 IFDS-"C" THEN HY=HY+1:KX=HX+1 

S00 RETURN 

310 J = STICK(0} 

820 IFJ=1 THENHY=HY-1 

830 IF J=2 THEN HY=HY-1:HX=HX+1 

640 IFJ-3THEN HX=HX+1 

850 IF J =4 THEN HX-HX+1:HY-HY+1 

m IF J=5 THEN HY=HY+1 

870 IF J=6 THEN HY=HY+1:HX=HX-1 

880 IFJ=7 THEN HX-HX-1 

890 IF J =8 THEN HX=HX-1:HY^HY-1 

900 RETURN 

910 CLS 

920 COLOR 4 

930 LOCATE 0,24 

940 PRINT "PUNTUACION :";$; 

960 IF IMH=1THEN 1000 

960 FOR HX=1 TO NH-1 

970 L0CATE19+HX,24 

980 PRINT H$: 

990 NEXT HX 
1000 COLOR 1 
1010 FORHX=0TO39 
1020 LOCATE HX.O 
1030 PRINT MS; 
1040 LOCATE HX ( 23 
H -D5C ^INTI'/S; 
1060 NEXT HX 
1070 F0RHY=1T0 22 
1080 LOCATE 0.HY 




1090 PRINT MS; 
1100 LOCATE 39. HY 
1110 PRJNTMS: 
1120 NEXT HY 
1130 FOR 1=1 TO NM 
1140 HX=INT|RND-38M 
-■- \~ -\2*12 -• 
1160 IFSGREEN - - riY)<>32 THEN 1140 
1170 LOCATE HX.HY 
"il - TVS 
1190 NEXT I 

I.: ::.:?.: 

1210 F0R]=1T0NR 

1220 R(l,0)=tNT [RND'38)t1 

1230 R l.11=tNuRND T 22)-M 

1240 IF SCHEEN(R(1 ,0).R(l . 1 ))<>32 THEN 1220 

1250 LOCATE R{].0),fl(l,1) 

1260 PRINT R$; 

1270 NEXT I 

1280 HX=INT (RND'36)+1 

1290 HY=INT RND*22 -hi 

1 300 IF SC REEN (HX , HY)< > 32 TH EN 1 280 

1310 X-HX 

1320 Y-HY 

1330 FOR 1=1 TO 5 

1340 LOCATE HX,HY 

1350 C0LOR5 

1360 PRINT CHR&H 27); 

1370 BEEP 

1380 FOR J = 1 T05D 

1390 NEXT J 

1400 LOCATE HX.HY 

1410 COLOR 4 

1420 PRINT HS; 

1430 FOR J = 1 TO 50 

1440 NEXT J 

1450 NEXT I 

1460 RETURN 

1470 CLS 

1480 SCREEN 4.2,0 

1490 ATTRB 1.1 

1500 LOCATE 10,10.0 

1510 PRINT "JOYSTICK ?"; 

1520 ATTRB 0,0 

1530 DS-INKEYI 

1540 C=RND 

1550 IF OS-" " THEN 1530 

1560 IF DS="'S" THEN JS— 2 ELSE JS — 1 

1570 RETURN 

•S3: DEFS ^=.01-23. 28. 73.62. 6.28, 2D. 20 

. .-, 

1 620 DEF33;.d=0.G, 24.60, 126.1 26,60,24 
1613 HS=GRS(0) 
1620 SS-GRS 11 
1630 MS=GRS(2) 

NS=CHRS(32) 
1650 RETURN 
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Sesion continua 

En este capitulo crearemos nuevas est ructuras de control y 
haremos uso de las capacidades recursivas de este lenguaje 



La primitiva RUN del logo toma una lista como en- 
trada y hace que se ejecute como si fuera una linea 
de un procedimiento. Se la puede utilizar para 
agregarle al lenguaje nuevas estrucluras de control 
como y cuando se las requiera. De manera que po- 
driamos definir un procedimiento MIENTRAS del si- 
guiente modo: 

TO MIENTRAS :C0NDICI0N :ACCI0N 
IF NOT (RUN :C0NDIC10N) THEN STOP 
RUN :ACC10N 

MIENTRAS :C0N0ICI0N :ACCI0N 

Vearoos afaora un ejempto de como podriamos uti- 
lizarkh POTBCIA mprime todas las potencias de su 
entrada inferiores a 10CO: 

TO POTENCIA :X 
MAKE 'P:X 

MIENTRAS [:P<1000] [PRINT :P MAKE "P :P':X] 
END 

Las estructuras de control, como WHILE, REPEAT y 
FOR, son comunes en otros lenguajes, pero en logo 
no son realmente necesarias. Una forma mas natu- 
ral de escribir POTENCIA seria: 

TO POTENCIA :P 

IFNOT:P<1000 THEN STOP 

PRINT :P 

POTENCIA P*:P 
END 

No todas las versions s de logo dispone n de RE- 
PEAT, pero esta estructura no es realmente necesa- 
dl ja que se podria definir una palabra equivalen- 
-± 1- i:r_ier/.e ~.zz: 



^E 1 V_V-~ 
BC 

RUN es una pnmitiva sumamente urO para trabajos 
mas avanzados. Un programa puede ensamblar 
una lista y pasarsela luego a RUN para que se la 
ejecute. Enseguida veremos un ejemplo de esto. 

Desarmar procedimientos 

En primer lugar debemos definir un procedimiento 
para dibujar un triangulo de la forma habitual: 

TOTRl 

FD50 RT120 FD 50 

RT 120 FD 50 RT 120 
END 

Ahora digite PRINT TEXT "TBI. El resultado sera: 

[] [FD 50] [RT 120] [FD 50] [RT 120] [FD 50] [RT 
120] 



El texto del procedimiento se da como una lista de 
listas, donde cada lista "interior" es una linea del 
procedimiento. Para ver por que al principjo hay 
una lista vacia, defina esta variante para la suma; 

TO SUMAR :A :B 
PRINT :A+:B 
END 

Ahora PRINT TEXT "SUMAR dar£: 

[:A :B][PRINT :A+:B] 

Evidentemente, la primer a lista contiene las entra- 
das para el procedimiento. De modo que TEXT nos 
permite introducimos en un procedimiento y a\ eri- 
guar que hay aBi. DEFINE, por el contrario. hace 
exacramente lo inverse: nos permite definir un pro- 
cedimiento como una lista de listas sin tener que 
acodir al editor. Pruebe ahora DEFINE U L[[:A][FD 
:A][RT 90] [FD A 2] .] y despues ejecute L utilizando. 
por ejemplo. L 30. El empleo de DEFINE de esta 
forma en modo inmediato no ofrece ninguna ven- 
taja respecto al empleo del editor, La ventaja que 
nos reporta DEFINE es la posibilidad de que un pro- 
cedimiento cree otro procedimiento. 

Crecimiento 

Ahora vamos a desarrollar un pequeno sistema 
para investigar el crecimiento. Las instrucciones ba- 
sicas de nuestro sistema son PEDIR, que selecciona 
la forma de la que nos ocuparemos, y CRECER, que 
cambia ei tamano de la forma elegida. Por ejem- 
plo, PEDIR "CUADRADO dibujara un cuadrado, y 
luego CRECER[* 10] borrara el cuadrado y volvera a 
dibujarlo con cada uno de sus lados incrementado 
en un factor de 10. 

Para que los programas sean sencillos tendremos 
que aceptar algunas restriction es en relation al uso 
_t r.stniccioiies En primei lugar, los proce- 
irr_ien::i ::rr"_^ ____> j 2 zZ 1 e;::::ida 
00 baa de cootener REPEAT ni llamai a subprocedi- 
mign trK En segundo lugar. el sistema se colgara si 
se obtienen resuJtados negativos. Resoher estos 
problemas no es muy diflcil si usted desea introdu- 
cir mejoras en io que le ofreceremos a qui. 

PEDIR funciona asignandole el nombre de la 
forma a la variable global ''ACTUAL y ejecutando 
luego el procedimiento. Esto lo hace ere an do una 
lista de un elemento (el nombre del procedimiento) 
y valiendose despues de RUN para ejecutarla. 

TO PEDIR :0BJET0 
HIDETURTLE 

MAKE "ACTUAL :0BJET0 
RUN (LIST ;0BJETO) 
END 

CRECER borra primero el dibujo original (para el 
borrado el logo Commodore usa PENCQLOR-1), 
luego utiliza DEFINE para definir al procedimiento 
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DitapBi ma tortuga 

\: ii :.f if = . iir rrucho en 

i _ e'rc.^rse con la 
r:_-s :* : : : be define en 

: L :'- Memos 
. r: = r~: := ::mo 
:■: it: ~ -. a ije se i a. nan a 
e • i - : ; =:ssciei'n das en 

procetfmientos que esc ri ben 
procedtmrentos. Con un. poco de 
imagination, en logo serf a facil 
crear un dibujo que utilizaraa la 
Tortuga para generar una tortuga 
que dtbujara una tortuga.,. 




actual como reescrito. El color del lapiz vuelve 
luego a ser normal y se dibuja la nueva forma. Ob- 
serve que la entrada de CRECER sc almacena en 
OPLIST, que nos sera necesaria despues, 

TO CRECER :0PUST 
PENC0L0R-1 
RUN (LIST :ACTUAL) 

DEFINE :ACTUAL REESCR1BIR.PR0C TEXT 

;ACTUAL 

PENCOLOR 1 
RUN (LIST :ACTUAL) 
END 

REESCRIBIR.PROC separa el texto en Uneas y se las 
va pasando de una en una a REESCRIBIR.LINEA: 

TO REESCRIBIR. PROC ;TEXT0 
IF EMPTY? :TEXT0 THEN OUTPUT [1 
OUTPUT FPUT REESCRIBIR.LINEA FIRST 
TEXTO REESCRIBIR.PROC BUTFIRST TEXTO 

END 



:L1NEA 

OUTPUT FPUT FIRST 1INEA REESCRIBIR. 
LINEA BUTFIRST :LIMEA 

END 

CAMBIAR construye la linea "reescrita". El primer 
eleniento de LISTA (la entrada de CAMBIAR) habra 
sido la entrada de FORWARD en el procedimiento 
origtnal. Supongamos que es 50 y, si OPLIST contu- 
viera [* 2], entonces SENTENCE FIRST 1ISTA :OPLIST 
seria [50 * 2}. Ahora CAMBIAR utiliza RUN para cva- 
luar esta lista (obteniendo un resuitado de 100). 
Por ultimo, se construye una lista compuesta por 
FD. la cantidad que se acaba de evaluar, y despues 
la reescritura del resto de la linea: 

TO CAMBIAR :LIS1A 
OUTPUTfSENTENCE FD(RUN SENTENCE 
FIRST :USTA :OPLlST) REESCRIBIR. 
LINEA BUTFIRST 1ISTA) 

END 



REESCRIBIR.LINEA busca a lo largo de una linea una ||T1 jtSdOT 

FD o FORWARD. De encontrar una, le pasa el resto 
de la linea a CAMBIAR para que se encargue de ella, 



TO REESCRIBIR.LINEA :LINEA 

IF EMPTY? :LINEA THEN OUTPUT [] 
IF ANYOF FIRST :UNEA="FD FIRST :L(NEA= 
"FORWARD THEN OUTPUT CAMBIAR BUT- 
FIRST 



En algunas ocasiones es util poder hacer una copia 
de un'procedimiento. De esta manera, vamos a de- 
finir un procedimiento (COPIARDEF), de modo que 
COPIARDEF "NUEVONOMBRE "VIEJONOMBRE defina 
NUEVONOMBRE como una copia de VIEJONOMBRE 
(VIEJONOMBRE no sufrira ninguna alteration). Una 
definition obvia es: 
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TO COP1ARDEF :NUWO :VIEJO 
■ DEFINE :NUEVO TEXT :VIEJO 
END 

El problema de esta definicion es que si VIEJO no 
existe, el procedimiento se limitara a seguir adelan- 
te y definira a NUEVO como nada. Seria mejor de- 
tectar este problema e informar sobre el mismo. 
Por lo tanto, una definicion mejor de COPIARDEF 
seria: 

TO C0PIARDEF:NUEVO :VIEJ0 
IF NOT PROCEDIMIENTO? .VIEJO THEN 
(PRINT[N0 HAY NIMGUN PROCEDIMIENTO] 
:VIEJ0)ST0P 

DEFINE :NUEV0 TEXT :VIEJ0 
END 

Aqui se utiliza un procedimiento llamado PROCEDI- 
MIENTO?, que produce VERDADERO si su entrada es 
un procedimiento, y, de lo contrario, FALSO. PRO- 
CEDIMIENTO? y su complements PRIMITIVA?, son 
comprobaciones muy- utiles; pero lamentable me nte 
do existen en logo MIT. De modo que hemos de- 
sanoOado versiones de PROCEDIMIENTO? y PRIMI- 
TIVA? que runcionaran con las versiones logo tanto 
Apple como Commodore: 

TO PROCEDIMIENTO? :NOMBRE 
IF NUMBER? :N0MBRE THEN OUTPUT 
"FALSE IF LIST? :N0MBRE THEN OUTPUT 
"FALSE 
TEST WORD? :N0MBRE 
IFTRUE IF WORD? TEXT :N0MBRE THEN 
OUTPUT "FALSE ELSE IF NOT (TEXT 
:N0MBRE=[]) THEN OUTPUT "TRUE 
OUTPUT "FALSE 

END 

TO PRIMITIVA? :N0MBRE 
IF NUMBER? :N0MBRE THEN OUTPUT 
"FALSE 

IF LIST? :N0MBRE THEN OUTPUT "FALSE 
TEST WORD? :N0MBRE 
IFTRUE IF WORD? TEXT :NOMBRE THEN 
OUTPUT "TRUE ELSE OUTPUT "FALSE 

EM 



Ultimas palabras 



• Learning with loco, de Daniel Watt i McGraw- 
Hill), es un maravilloso libro de introduction e 
ideal para utiliza rlo con ninos, 

• logo, de Harold Abelson (McGraw-Hill), es el 
Mbro "estandar" sobre el lenguaje. 

• Turtle geometry, de Harold Abelson y Andrea 
diSessa (MIT Press) realiza un serio analisis sobre 
la geometria de tortuga, La matematica involucra- 

es de un nivel de primer curso y de facultad; \cn 
uqo de los ultimos caprtulos se desarrolla un simu- 
tador para relatividad general en logo! 

• Thin king about [ TL C] l ogo , de Joh n R. Allen, 
Ruth E, Davis y John F. Johnson (Holt Sanders 
International Editions), utiliza el TLC logo, que es 
bastante idiosincrasico, pero la obra es valiosa por 
sus tern as de investigation y de inteligencia artificial 
en logo. 



IBS** 
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+5V 



+ 12V 



EL CQNECTOR D 
VISTO DESDE ATRAS 



El interior 



En este capitulo de nuestra 
serie continuaremos 
ensamblando el robot y 
escribiremos un programa que 
compruebe la labor que hemos 
realizado hast a ahora 



Conexidn de enchufes 

Los diagramas del enchufe de la puerta para el 
usuario muestran las conexiones para cada tipo de 
enchufe. Los usuarios del BBC Micro deben usar 
un cable piano de 20 vfas y un eonector IDC de 20 
vias de ajuste a presion, Indicando las conexiones 
en el extremo libre del cable, se deben pelarlos 11 
cables necesarios y emparejar con las conexiones 
de la placa de interface. 

Los usuarios del Commodore 64 deben usar un 
eonector marginal de 24 vfas y un trozo corto de 
cable piano de 12 vfas, Marque las conexiones en 
el enchufe y emparejelas con las conexiones de la 
placa. Ya que este eonector se puede insertar por 
cualquiera de los lados, es importante serialar de 
afguna forma la parte superior del enchufe. 
Ahora ya podemos enchufar el cable de la interface 
en el robot y en la puerta para el usuario. 
Asimismo, se debe enchufar una fuente electrica 
CD de 12 Ven el eonector de 2,1 mmde la placa de 
interface 



Control del robot 

Ahora que ya hemos completado la primera fase de 
construction, podemos escribir un corto programa 
para controlar el robot desde el teclado. Los bits 
del 0 al 3 del registro de datos de la puerta para el 
usuario controlan los motores, El bit 0 es el bit de 
initialization, establecido normalmente en 1 ; los 
bits 1 y 2 controlan, respectivamente, las 
direcciones del motor a derecha e izquierda. El bit 3 
es el bit de impulso que dispara los motores para 
que giren otro paso, El programa utlliza las teclas 
T, B, F y H para controlar la direccibn y un bucle 
repetitivo para impulsarlos motores 



IE. " T" EEC 



1030 AS=WKEVS(T>:ff AS<>"'THENPROtoMniTOb»_fedado 

1050 UNTIL AS='X w : 9 flEGDAT=0:ENO 
1060 OEFPROCm^wliiai 

1070 adeiartE = 4: ai ras = 2: izquieitta = 6: d&r&cha =0 
1030 <Jir= tftfanletfREGDAT »r»r+ 1 rENOPROC 
1100 DEF PRQCimpif isa(m} 
1110 F0Rc=1T0m 

1120 ?REG3AT-;?fv:SDA-CH 8i:FaCC-=s.-ncfai2i 
1130 ?REG OAT = { 7REG DAT ANU Z47);PROC<JEmara(2) 
1140 NEXT c; END PflOC 
1150 DEF PROGdempra(n) 
1160 FOR 1 = 1 TO n:NEXT| 
1170 ENDPROC 

1180 DEF PROCcomprobar_teslado 

1190 IF«*TTHMdi/*adBltoiiitl 

1200 IFflS='B- THENdir^atras 

1210 IFAS=-F" THENdir=i«niierda 

1220 [FAS=-H"THENdtf = lSaHCha 

1230 ''REG DAT = (( ?REG0AT AND 249)0 R d>r) 

1240 ENOPROC 

10 REM ■ ■ ■ ■ CQNTROLADOR DEL ROBOT CWIfl 64 ' ■ " 

20 ROD = 5G579:REGDAi =56577 :POKER OD. 1 5 

30 GOSU£1QOO:REM IWICIALtZAR 

40 GETASilFASo"" THEN GOSUB30OO:REM TECLAS 

50 M=10jGOSIJ6150C REN '. ,;> ULSO 

50 IFAS<>"X" THEN 40 

70 POKEREGDAT.OEND 

1000 REM — S-fl INICIALIZAR 

1010 AD=4:AT=2:iZ = G:DE=0 

1 020 Oft = ADtPOKEREGDAT, OR + 1 :RETUftN 

1500 REM ■■■■ S.RIMPULSD'*** 

1510 FDRC = 1 TOM 

1520 POKER£QDAT.IFEEKfRIGDAT)Oft8):GOSUBM00:RFM DEMORA 

1530 POKEREGDAT. | PE EKfREG DAT)AN02«17j :GOSUB2O0O:REM DEM0RA 

1540 NEXT D:R£TUHtt 

2000 REM ■■■*^FiDEM0RA■" , 

2010 FOR I -1 TO K:«EXT l:RETURN 

3O00 HEM '*'* S' ft PROS BA TECLAOO 

301 0 IFA$=T THENOR=AO 

3020 IF AS- "fl F THEN DR=AT 

3030 IFAS=^F'THEN OR = 12 

3O40 IF A$= "H'TKEN OR=DE 

-: i-izi-- -ee-: re::-" i\:2-x 

3060 RETURN 



Eslabones perdidos 

Para conectar los motores y el enchufe D a la placa 
de circuitos, tendra que volver a remitirse a la 
ilustracion de la placa de circuitos de p, 1317. En 
este diagrama vemos donde soldar los cables 
correspondientes en la placa. Tome primero las 
conexiones del motor: cada motor tiene seis cables 
que salen de su cuerpo. Observe con atencion que 
los cables emergen de la carcasa del motor en dos 
grupos de tres. Cada grupo de Ires cables posee 
uno amarillo, uno gris y uno rojo. El par amarillo y 
gris etiquetado E A" y "B" sale de la carcasa desde 
el punto mas cercano al eje del motor, tal como se 
aprecia en el diagrama. Relacionando estas letras 
con las conexiones con letras para cada motor en el 
diagrama de la placa de circuitos, suelde cada cable 
en su lugaren la placa 
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>nstruccion de un robot/Bricolaje 




Lista de componentes 


Cantidad 


ArticuEo 


1 


Conector D 15 vias 


1 


Funda D 15 vias 


1 


Enchufe de potencia 2,1 mm 


1 


Conector IDC 20 vias (BBC) 


1 


Conector marginal 24 vias (C64) 


1 


Rollo parches autoadhesivos 


Varios 




4 m 


Cable piano 12 vias 


1 m 


Cable piano 20 vias (BBC) 


1 


FuenteaEimentacion CD 12 V 1 amp 



CONEXIONES A 
LA PUERTA PARA 
EL USUARIO 
APROPIAOA 




CONECTOR DE POTENCIA 
2,1 MM 



PLACA INTERFACE PUERTA PARA EL USUARIO 



BBC Micro 




+5V 



Commodore 64 




CONECTOR MARGINAL 
DE 24 VIAS AL ORDENADOR 



Disehar la placa 

Habiendo completado las conexiones internas para 
el robot, hemos de disehar una placa interface 
simple que nos permita controlar al robot desde la 
puerta para al usuario y suministrar los 1 2 V de CD 
que requieren los motores paso a paso, 
Corte un trozo de veroboard de 24 franjas por 14 
agujeros y conecte 3 m de cable piano de 12 vias a 
la placa, tal como se indica. Utilizando la tira roja 
de uno de los lados del cable a mode de guia, 
suelde los 12 cables a las patillas correspondientes 
de un conector D y coloque la funda del conector D 
para asegurarel cable. 

Monte el enchufe de potencia de 2,1 mm en la 
placa, senalando la orientacibn de las patillas. El 
polo central de este enchufe es negativo, Luego 
haga los enlaces de cables tal como se indica, 
Observe, tambien, las conexiones de la puerta para 
el usuario; recuerde que los conectores de estaen 
el BBC Micro y el Commodore 64 son diferentes 



Hacer conexiones 

Unavez hechas las conexiones del motor, solo nos 
resta hacer las conexiones adecuadas para el 
enchufe D, montado en fatapa del cuerpo del 
robot. El diagrama ilustra las conexiones de patillas 
coiTBspondientes para el enchufe D, vistas desde la 
cara inferior de latapa. Utilizando un trozo de cable 
piano de 12 vias, conecte las lineas de datos, de 
DOaD3, las conexiones de +5V, +12 Vytierraa 
la placa de circuitos. Debera remitirse al diagrama 
de la placa de circuitos que ofrecimos 
anteriormente para observar las posiciones 
correctas del cableado de estas lineas a la placa de 
circuitos, Tenga especial cuidado en asegurarse de 
que la linea de potencia de +12 V se conecte en el 
punto correcto de la placa de circuitos. De no 
hacerlo asi, se podn'an danar los circuitos internos 
de su ordenador. Las lineas de datos de D4 a D7 no 
se deben conectar en esta etapa, porque estan 
reservadas para los sensores de entrada. 
Todas las conexiones del interior estan ahora 
completas. Busque dentro de la carcasa un lugar 
para alojar la placa de circuitos y asegurelo con 
parches autoadhesivos, Cierre la tapa y fijela con 
las cuatro tuercas angulares que se proporcionan 
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Lenguaje maquiita/Sistemas operatives 



Principios operativos 

Un sistema operative hace el papel de mediador entre el programa 
y la maquina. Con este capftulo iniciamos el estudio de los 
sistemas operativos de los microordenadores mas populares: 
BBC Micro, Sinclair Spectrum, Commodore 64 y otros 



Un sistema operative (OS: operating system) esta 
escrito en el lenguaje maquina que emplea el mi- 
croprocesador incorporado al ordenador. Ask por 
ejemplo. el OS del BBC esta escrito en codigo ma- 
quina del 6502 y el del Spectrum en codigo del ZSCL 

Un OS se compone de una serie de rutinas a las 
que se confian numerosas fundones de la maquina. 
Segun esta, puede* por ejemplo. contener una ruti- 
na que rastrea el teclado cuando se oprime una 
tecla. lo que permite al usuario no ocuparse de este 
detalle al escribir software. Bn un buen sistema 
operative, el usuario debera tener acceso a cual- 
quier detalle de la maquina sin que por ello deba 
conocer antes su position ex act a en la memoria del 
ordenador o mapa de entrada/salida de la rutina 
que controla esa determinada parte del hardware. 
Esto significa que se pueden hacer mas facilmente 
cambios en la maquina, cuando el OS ha sido cam- 
biado para adaptarse al nuevo hardware, de tal 
modo que los vicjos programas puedan servir tam- 
bien en la nueva version de la maquina. 

El sistema operativo del BBC, por poner un 
ejemplo, cs un moddo de planificacion* Un progra- 
ma escrito en basic del BBC para una maquina es- 
tandar servira perfectamente en un BBC Micro 
cquipado con un segundo procesadon aun cuando 
este represent e una sustancial variation del hard- 
ware de la maquina. El OS del BBC ha atravesado 
van as etapas de desarrollo y experimentado diver- 



sas mejoras hasta lie gar a su actual estado de refi- 
nance mo. Hace tiempo que ha desaparccido del 
mercado la version O.L que fue la primera en apa- 
recer. Se compoma de cuatro chips EPROM, pero 
le faltaba flexibilidad y. lo que es mas grave, no 
preveia las unidades de disco. La que si lo hacia era 
la version LO, que se compoma dc dos chips de 8 K 
colocados sobre una pequena placa de circuito im- 
preso dentro de la maquina. La version actual es la 
1,2, que se encuentra en la mayoria de los micros 
BBC utilizados hoy dia, Existe una variante de esta 
version » la L2 (US), diseriada espeeialmcnte para 
el mercado estadounidense. 

La version de su propia maquina la puede usted 
avcriguar facilmente con solo escribir la orden *FX0 
y pulsar la tecla Return, El numero de la version 
del OS aparecera en pantalla. La orden *HELP tam- 
bien proporciona el numero de la version del OS, 
pero lista ademas los nombres de los chips ROM 
que posee la maquina. 

Que hace el sistema 
operativo del BBC 

Las tareas del sistema operative del BBC pueden 
agruparse en cuatro categorias principals: 

/. Rutinas de en trader. Est as rutinas reciben infor- 
mation de la I lama da co trie ate de en n a da en curso, 




Teatro de operaciones 



EI mejor sistema operative es 
el que nose ve. Pa r ae! 

"usuario debera ser una 
interface com pi eta me me 
cristaHna entre la apiicacion y 
el hardware, que controla 
discos.' dosffica lasalida. guia 
la pantalla, hace eitrabajo 
sistematico. Para e! software ' 
y para el hardware ha de ser . 
una constante fuente de 

•entradas bien smcromzadas. 
bien formateadas. y un 
perenne vigfa receplorde 
salioas de todo tipo. A su vez. 

: 1os inferos de sistemas 
esoeran que los usuaricis y 
dernas ingenieros evitaran 
toda comunicacion 
sistematica que no este 
canaiiz.ada por medio del 05 



tm 



Sistemas operativos/Lenguaje maquina 



Esta suele ser el teclado, pero otras corrientes de 
cntrada son la interface RS423 y el sistema actual 
de archivos, al cual se accede por medio de la orden 
*EXEC, La mayor rutina encargada de las entradas 
desde las citadas corrientes se llama OSRDCI 1 {OS 
ReadD CHatacier: lectura de caracteres del OS). 
2. Rutinas de salida y visualization: Encargadas de 
las salidas generadas por el ordenador. En el BBC 
hay un buen niimero de corrientes de salida, desde 
la visualization en televisor hasta la impresora, la 
interface RS423 y el sistema de archivos manejado 
por medio de la orden *SP00L Pero ademas de 
encargarse de la impresion y de los demas niodos 
de dar salida a los datos, estas rutinas del OS con- 
trolan el chip de visualizacion 6845 dentro del orde- 
nador y el empleo de los caracteres definidos por el 
usuario, por citar tan solo dos de las funciones extra 
atribuidas a estas rutinas. Las llamadas del OS son 
las siguientes, OSWRCH (OS WRite Character: 
escritura de caracteres del OS), OSASCII v OS- 
NEWL. 

J„ Sistemas de archivo: Todo sistema ope rati vo 
debe proporcioriar al usuario los medios para guar- 
dar el cooieatdo de la memona del ordenador 
sobre algun sopone mas duradero. La seccion del 
OS que gestiona tales transacoooes se llama ^ste- 
rna de archivos actuates seleccionados. \ en el BBC 
se tienen las opciones de la cinta magnetica. el 
disco, el Econet, la ROM o el telesoftware. Las 
rutinas de archivo del OS pueden servirse de otras 
rutinas adicionales cn ROM que instruyan al OS 
para el trato con el hardware asociado con el siste- 
ma particular de archivo. 

Para hacer posible la interconexion con medios 
de almacenamiento magnetico a t raves de ROM 
paginadas para sistema de archivo, se in cor po ran 
un buen numero de rutinas estandar del OS desti- 
nadas a la administration de archivos, Entre ellas 
se encuentran rutinas para escribir o leer archivos 
enter os, para la obtencion o el envio de bytes indi- 
viduales desde un fichero abierto y rutinas de lectu- 
ra o escritura de grupos de bytes desde o hacia un 
archivo. Las siete llamadas del OS referentes a la 
gestiofl de archivos emplean cada una un vector 
para fodicar la rutina adecuada en el sistema de al- 
■aceKnieato en cassette. Si se conecia una ROM 
pasHh de ill mi de archivo. puede aunarse con 

bask: o es msembtf caafeiaado snpiesaenie estos 
niAutiA peg* ye apnafFii a sns propias raflnas en 
ROM. Una ROM de esxe tjpo es la DFS ROM que 
permite al BBC Micro el empleo de unidades de 
disco flexibles. 

4. Inter rupciones: En esencia, una interrupcion es 
una serial generada sea por el hardware sea por el 
software que indica a la CPU que interrumpa lo 
aue actualmente esta haciendo y realice la tarea 
que pide inmediata atencion. Una vez realizada 
esta. la CPU reanuda lo que est aba haciendo come 
si nada hub i era o euro do, En el BBC existen nume- 
rosas fatilidades de tratamiento de interrupciones a 
las que el usuario puede acceder gracias al OS. 

Ademas de estas cuatro areas principales, existen 
dos llamadas del OS de capital importancia que 
control an diversas funciones de la maquina, Se Ha- 
inan OSBYTE y OS WORD (word: palabra), em- 
plead as para controlar el chip de son i do, la teela de 
interruption o break y cosas similares. 



tPor que emplear llamadas? 

En la mayona de los casos es posible obtener, a los 
pocos meses del lanzamienlo de una maquina, la 
information necesaria sobre la disposition interna 
de la memoria del ordenador y del hardware en ge- 
neral (salvo implicadones legates}. Si conoccmos 
talcs detalles ( ;a que viene interesarnos por las lla- 
madas del OS? ^No es mas sencillo acceder a los 
dispositivos o a la memona direetamente? 

En parte ya hemos dado respuesta a esta pregun- 
ta anteriormente: las llamadas del OS nos previe- 
nen contra futuros cambios del hardware o de la 
configuration llevados a eabo por el fabricantc. De 
igual modo, si se llamara a las rutinas por medio de 
sus actuales direcciones en la ROM nos encontra- 
riamos con dificultades en el momento en que esta 
ROM fuera modificada; si se accede a las rutinas de 
la ROM por medio de las adecuadas llamadas del 
sistema operativo, se tienen siempre previstas estas 
eve ntu alidades. 

La in st nice ion que citamos ahora escribira, en un 
BBC Micro comun. el valor 200 en la puerta para el 
usuario que esta en la direction &FE6Q\ 

?&FE6G=200 

Si anade un segundo procesador al ordenador. 
esia rutina no enviara tal valor a la puerta para el 
usuario- sino que lo escribira en una position de 
memoria de este segundo procesador. Por medio 
de una adecuada Ilamada del OS podemos obviar la 
dificultad; la Ilamada sabra como escribir el valor 
en la puerta para el usuario este 0 no este conecta- 
do un segundo procesador, Tal Ilamada seria: 

*FX 151,96,200 

Se trata de una de las muchas llamadas del sistema 
operativo que pueden emplearse para acceder a las 
areas del BBC, tales como el VIA (versatile interfa- 
ce adaptor: interface adaptador versatil para el 
usuario) y el bus de 1 MHz. 

Por otra pare, no hay que estar siempre inven- 
tando la rue da. Si ya existe dentro de la maquina 
una rutina para realizar una determinada funciom 
^para que vamos a preocuparnos de ir directamen- 
te a las rutinas de la ROM? El caso es que la llama- 
da del sistema operativo es mas eficaz que el acceso 
directc a las rutinas implicadas en dicha Ilamada, 

Las unicas razones realmente convincentes para 
acceder direciamenie a la memoria o a los dispositi- 
vos del hardware seria si fuera necesaria una mayor 
rapidez en el acceso o si no existiera la Ilamada del 
OS que reaiizara la tarea requerida. Si la velocidad 
fuera un factor crucial, el acceso directo es con fre- 
cuencia mas rapido que el camino por las rutinas 
del OS. Sin embargo, resulta bastante peliagudo el 
acceso directo a la maquina, y nos guard are mo s 
mucho de hacerlo, recordando siempre que los pro- 
gramas que funcionan en una maquina determina- 
da no sirven en otras maquinas con un OS o un 
hardware conectado diferente, Este tipo de proble- 
mas se encuentra mas en el OS del BBC, debido a 
los numerosos cambios que ha sufrido desde su pri- 
mera aparicion, que en el Spectrum, que siempre 
ha permanecido fiel al mismo OS. La proxima lec- 
tion estara dedicada al examen de las rutinas del 
OS del BBC. 

Mas adelante trataremos del OS del Spectrum y 
de otros microord en adores. 



Software/Summer games 



Records oh'mpicos 

"Summer games" (Juegos de verano), original juego escrito para 
el Commodore 64, incluye ocho pruebas deportivas de gran 
emocion, desde atletismo hasta gimnasia 



Dompitlejido 

La calidad del Summer games 
de Epyx se aprecia claramente 
en estas fotografias, Cada 
prueba se carga individual™ ente 
desde disco o cinta, lo que 
permrte almacenar y process: 
grandes cantidades de datos de 
alta resolucion para los fondos 



Summer games (Juegos de verano). de Epyx, in- 
cluye ocho pruebas deportivas, desde atletismo y 
natation hasia gimnasia y tiro. En cada prueba 
pueden participar hasta ocho competidores distin- 
tos. quienes pueden elegir un pais al cual represen- 
tar entre un total de 17. Los ciudadanos de paises 
cuyas banderas no esten incluidas tienen la oportu- 
nidad de participar bajo el estandarte de Epyx* 

Una vez cargado el juego, la primera escena 
muestra la ceremonia de apertura. Acompanado 
por una miisica convenientemente heraldica* un 
atleta poriador de la antorcha ohmpica sube co- 
rn end o hasy^ffiaplataformi^encietide la llama, 



mientras 
El sonid 
son un 
El fou 
grafico? 
bits, y 1<J 
las pa lor 
des de sp 



fibera al ciclo una ba 
; los graficos de la cerer 



ada de palomas, 
ia de apertura 



uena muestra del conjuri-tb del paquete. 
esta dibujado cuidadosarrmnte utilizando 
e alta resolucion trazadol por mapa de 
uniformcs movimientos c]£ cor redo r y de 
$ son result ado dc las ex^elenles facilida- 
5 del Cornrnodore^M music%si bien 
no es el me]S^iemplo del^Pe se puede conse- 
guir empleand^TOiip^O^vowrtrf interface device: 
dispositivo interface de sonido) del Commodore 
64, hace buen uso de ios tres osciladores disponi- 
bles. La impresion general es que e] program a. no 
obstante, explota al maximo las capacidades del or- 
denador, 

Los jugadores pueden optar por participar en 
todas las competences, en una sola, practicar un 
deporte o ver una list a de los records mundiales de 
cada deporte. Hay, asimismo. una option que per- 
flate el empleo de una o dos paiancas de mando, las 
cuales ofrecen a los jugadores la posibilidad de 
competir directamente entre si en las pruebas de 
natacion y carrera sin necesidad de recurrir a un 
tern poriza dor de paso por ordenador. 




Salto dE trampolin 
desde 15 m 



Los 1 DO m lisos 



La primera de las ocho pruebas es el salto con 
pertiga, que quiza sea la mas dificil de todas. Los 
jugadores compile n de uno en uno respondiendo a 
una serie de preguntas por parte del ordenador. 
Cuando esta preparada la altura minima de la 
barra. de 4 m, se le pregunta al jugador si desea 
competir a esa altura. Si la respuesta es afirmativa, 
el ordenador pide entonces la position de salida de 
la pertiga y el atleta empieza entonces a correr a lo 
largo de la pantalla. 

El jugador ha de tirar la palanca hacia atras para 
fijar ia pertiga, empujarla hacia adelante para Ie- 
vantar al atleta por encima de la barra y despues 
accionar el pulsador de disparo para dejar caer la 
pertiga c impedir que la misma caiga contra Ia 
barra. Cada una de estas acetones exige una sincro- 
nizacion de fraction de segundo, puesto que un 
error de calculo en cualquier punto provoca inme- 
diatamente la caida de la barra. 

Esta secuencia es una buena ilustracion de la 
clase de parametros que se ban de considerar du- 
rante la codification. No solo es necesario que la 
pantalla este totalmente apoyada en to do mom en to 
para asegurar un desplazamiento uniforrne de los 
graficos, si no que tambien el ordenador ha de veri- 
ficar los movimientos producidos en la palanca de 
mando y el pulsador de disparo. Por ultimo, el or- 
denador debe comprobar que la pertiga y el atleta 
esten en el angulo y la posicion correctos para saltar 
con exito. Mientras se Ileva a cabo todo ello, el 
usuario no debe notar que estas acciones estan te- 
niendo lugar. 

Tras cada prueba aparece una tab I a que muestra 
las medallas concedidas y se inter pre ta el himno na- 
tional del pais ganador. Entonces el ordenador 
carga la siguiente competicidn. El hecho de que 
cada prueba se cargue por separado es un indicador 
de la cant id ad de codigo que se requiere para eje- 
cutar cada prueba. 

Las compel iciones que siguen a continuation son 
salto de trampolm y gimnasia. Aqui el jugador 
debe manipular la palanca de mando para producir 
una zambullida o un salto uniforme, asegu ran dose 
de acabar con una suave entrada en el agua o de 
caer cuidadosamcnte sobre la colchoneta. El orde- 
nador puntua, entonces, la ejecucidm 



Summer games: Para el Commodore 64. 
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Lo que vendra 



Trabajador de cuello metalico 



Sensores 
Infrarrojos, 
luminosos, etc 



Mano 

herramienta 
de poiencia 



Saiida 
impress 



Antena 

Comunicaciones 
a distancia 



Unidad de disco 

Para en trad a/sal i da 
de dates y software 




Sondas 

Gama de instrumentos 
de medicion, lapices 
opticas, sondas 
logicas 



Parotallaytecladt 

El robot es un ordenador 
movil y se lo puede 
utilizar comotal; los 
ingenieros de 
marttenimiento 
necesitaran accede r al 
software y prog ram as de 
diagnosticodel robot 

Attavuz 

Ofrece una saiida de 
babla sintetizada 

Micrfiforto 

Para reconocimiento 
devozy sonido 




Pie 

El robot se puede "sentaf" 
sobre su base, puede hacergirar 
sus piernas y cambiar sus pies 
por pinzas, cambiandosu 
cap acid ad de movimiento por 
una enonme manejabilidad y 




Finalizaremos esta serie ded icada a la robotica tratando de 
vislumbrar los futures adelantos en este campo 



Operario del mariana 

Si alguna vez se desarrollara un 
robot con fines generales 
parecido al ser humano, a un 
costo que lo convirtiera en un 
sustituto razonable de la mano 
deobra semiespecializada, 
necesitaria una "inteligencia" 
sumamente desarrollada que 
comprendiera base de datos de 
conoclmlsntos, integration 
sensorial, base de datos de 
habilidades y software para 
aprendizaje. Una inteligencia 
como esta se podrfa empaquetar 
en una gran diversidad de 
cuerpos. He aqui uno de los 
posiblestipos, que podrfa 
fun cionar como un obrero 
semiespecializado de la industria 
ligeraopesada 



Nuestra serie sobre rob6tiea ha dejado claro como 
el mundo real de los robots continua muy ale j ado 
del concepto que ha ere ado la literatura noveleses 
acerca de los seres pensantes mecanicos, Nuestra 
imaginacion nos ha conducido a esperar ciertas 
cos as de los robots. Esperamos que sean cap aces de 
moverse con entera libertad, aliment ados con su 
propia energia; que vean, oigan y perciban el 
mundo que los rode a; que hablen con nosofros 
sobre ciencia y filosofia o que, al menos, se com uni- 
que n de una forma inteligente, y que manejen 



objetos e ideas tal como lo hacemos nosotros. En 
otras palabras, en nuestra imaginacion hemos crea- 
do los robots a nuestra propia imagen y semejanza, 
Cuando observamos con ojo critico los robots co- 
me rciales, industriales y para aficionados existentes 
en la actualidad, a menudo nos sorprendemos de lo 
bien que pueden realizar sus tareas espedficas, sin- 
tiendonos, al mismo tiempo, algo decepcionados 
por el hecho de que no puedan hacer mas. 

Sabiendo lo que ya sabemos ahora acerca de la 
naturaleza del diseno y la implementation de ro- 



Variaciones visuales 

El conoci miento acerca de un 
objeto se puede almacenar 
como una imagen "modefo" del 
objeto afquetipico r m3suna 
serie de sentencias de datos de 
variacfdn; cada sentencia de 
variacidn se puede aplicar al 
modelo para producir una 
imagen diferente que aun se 
ajustea la defmicion del tipo, 
Una imagen captada porlos 
sen so res del robot se explora 
mediante un m6dulo de ana'fisis 
bruto que proporciona una 
primera hiipotesis respecto a la 
clase de objeto que esta a la 
vista, Cada objeto se compara 
con la imagen recibida hasta 
hallar una pareja. Laconfianza 
estadistica con la cual se efectde 
este emparejamiento determina 
si las variaciones de la imagen 
exigen la generation de una 
nueva sentencia de datos de 
variacidn 



bots, ^que podemos esperar, realista y practica- 
mente, de los robots del future? 



Movimiento 



Es sumamente improbable que en un futuro cerca- 
no ios robots caminen apoyados en algo que se pa- 
rezca a una extremidad humana. Sena preciso des- 
tinar dernasiado espacio de memoria y tiempo de 
proceso al esfuerzo que supone mantener el equili- 
brio, mientras que las junturas y la musculatura 
electrica o hidraulica carecen de la flexibilidad o la 
libertad de que gozan los seres humanos gracias a la 
interaction de musculos, tendones y cartflagos. 
Ademas, existen muchas ocasiones en las que el 
robot se vena muy limitado por el hecho de tener 
que andar sobre dos piernas. No obstante, reciente- 
mente se han construido algunos robots experimen- 
tales con 4 o 6 extremidades, con apariencia de in- 
sectos, Estos podrian ofrecer una interesante varia- 
tion de disefio para algunas aplicaciones robot. 
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Para otras aplicaciones, como pueden ser las 
operaciones militares, la exploration sideral y mu- 
chos usos convencionaies en el hogar, las ruedas 
suelen proporcionar el metodo mas practico de mo- 
vimiento. y es poco probable que esta situation se 
modifique. El desplazamiento del robot se volvera 
mas fluido, pero probablemente jamas pueda eom- 
petir con la belleza y la armonia de un atleta huma- 
ne en movimiento. 

Muchos robots industriales y brazos-robot mas 
pequenos estan necesariamente fijos en un sitio, 
con sus movimientos restringidos a un area de ac- 
tion muy espeeffica, dado que estan disenados para 
llevar a cabo una o dos tareas bien defmidas. A 
menos que la naturaleza del montaje industrial 
cambie de forma radical es probable que incluso 
los robots industriales ambulantes continuen relati- 
vamente confinados: seguiran siguiendo huellas, 
desplazandose sobre railes o colgando de guias ele- 
vadas. Es posible que los avarices en el campo de la 
automatization y el disefio robotico den lugar a un 
cambio radical en los metodos de production indus- 
trial, pero es imposible predecir en que consistira. 

Un elemento clave del movimiento es la necesi- 
dad del robot de responder a su entorno. Esfo sig- 
nifies que el robot debe estar bien equipado con un 
sistema sensorial y que la entrada sensorial debe 
estar en relation directa con su movimiento. 

Sensores 

Se puede dotar a los robots de equipos sensoriales 
sofisticados que amplien sus percepciones a areas 
nuevas o desconocidas para los humanos. Los sen- 
sores de proximidad, los detectores de movimiento, 
los dispositivos de re aliment ac ion posicional discre- 
te y precisa y los detectores de ruido con una gama 
muy amplia de freeuencias perceptibles, le confie- 
ren a un robot la eapacidad de captar datos mas 
variados que los que puede recoger un ser humano. 
Los sistemas visuales se estan volviendo mas exac- 
tos, con un aumento de la resolution de las ima ge- 
nes percibidas. Las tecnicas de suitesis y reconoci- 
miento de voz ser an, ciertamente, cada vez mas so- 
fisticadas y desempenaran un importante pa pel en 
el desarrollo de la robotica. 

Es muy probable que los robots de utilidades, 
empleados principalmente para aplicaciones indus- 
triales, continuen estando dotados solo de aquellos 
sensores necesarios para llevar a cabo las tareas que 
se les han asignado. Los brazos-robot sofdadores, 
por ejemplo, no tienen ninguna necesidad de dispo- 
ner de voz ni de una compleja realimentacion vi- 
sual. Pueden llevar a cabo sus trabajos con preci- 
sion y rapidez con un minimo de entrada sensorial, 
y las percepciones externas posiblemente constitui- 
rian mas bien un obstaculo, 

Los robots para fines generates, disenados para 
aprender a partir de la experiencia e imitar los pro- 
cesos del pensamiento humano, habran de estar 
equipados con la mayor cantidad de sensores posi- 
ble. Sena crucial que el robot fuera capaz de inves- 
tigar su entorno independientemente y asimilar la 
informaei6n recopilada, Los seres humanos depen- 
den en gran medida, por ejemplo, de una combina- 
cion de realimentacion visual y auditiva para com- 
prender el habla. Nosotfos a menudo tendemos a 
ignorar esta smtesis de sensaciones, en particular 
cuando pensamos en terminos del disefio de robots. 
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Robofica/Aplicacioiies 




Pero para que un robe* se comunique con un ser 
fcpBMKJu psa eaiender el knguaje en vez de tan 
sa: i iiMinti i luiHrfiiii inii de vista v soni- 

~Ez h ijr_iii^iC- ^ ^-i±z i*t zzi::< c^t 
robot pvode aceptar 5 m an jn esta severamente 
rescrmgida por la canodad de memona necesaria 
para aknacenar la entrada sensorial, y por las Inm- 
tadones de la potencia y la veioddad de proceso. 
Un robot puede almacenar una imagen visual de un 
objeso. oomo puede ser una manzana. y relacionar 
2 . - con un oombre. El almacenamiento de la 
magen ocupa memoria y, cuanto me] or sea la reso- 
lution visual del robot, mas memoria se necesitara 
para guard ar la imagen. Puerto que, ademas, todas 
las manzanas no son iguales, el robot debe tenet 
memoria suficieme para almacenar un muestreo ca- 
■ /-ristico de imagenes de manzanas, o bien un 
algoritmo que reconozca las vanaciones y sea capaz 
de hacer girar la imagen basica de modo que la 
manzana se pueda con templar desde cualquier po- 
sition. Aun con un minimo nivel de resolucion 
Cp, ej-, 256 pixels por imagen). la cantidad de varia- 
caeoes puede muy b*en ser de varios millares. 
E_- . -j^t -- r::~'-z\± z^t !u> Jernandas de 

: chips de RAM de 
( ■ f^ritfr se estau desarro- 
i^s 1 ISmM y a traves la utilization 




e r. 

para darificar d> 



:r_rps 1 r.r:;^ .rue ic^ 
versas imagenes drferentes. 

Ademas de una enorme memoria, la autentica 
contiencia sensorial de un robot requerina que los 
_ _ : . - entraran simultaneamente desde much as 
fbentes y que pudicran ser procesados rapidamen- 
te. Los procesadores existcntcs serian incapaces de 
tratar todo el volumen de information que cntraria 
en cualquier momento dado, y enseguida comenza- 
xiaii a amontonarse dates en espera de ser procesa- 
cte- Una solution muy probable para este proble- 
ma es el em pie o de dos o mas proces adores de gran 

- w j;J \ capacidad Irabajando en paraleio, Un 

procesador control ador actuaria entonces como ad- 
niiiistrador. distribuyendo tare as entre los procesa- 
dores del sistema que estuvieran desocupados. 

El progreso hacia la resolucion de los problem as 
_- r.^rdware con que se encuentran los investigado- 



res se esta produciendo a gran velocidad. Pero un 
robot necesitara de un software muy complejo que 
le permit a comprender lo que se esta procesando* 
Es decir. el robot neceska una mente para saber lo 
que tiene que hacer con sus percepciones. 

La mente 

Tal como hemes visto al analizar el movimiento y 
los sensores. hay dos direcciones principalis para la 
robotica. La primera. y la que cuenta con mayores 
probabilidades de explotarse pronto, es el area de 
las herramicntas inteligentes, o robots de utilida- 
des, Los brazos industriaies y los sistemas de fabri- 
cation automatizada que lie van a cabo tare as espe- 
cificas, independientemente de lo complejas que 
estas sean, solo necesitan estar provistos de un soft- 
ware control ad or cuidadosamente definido. A un 
brazo robot se le puede dar un juego de coordena- 
das y programarlo para que ejecutc una secuencia 
de accioncs sin comprender lo que esta haciendo, 
donde se encucntra, ni ningun otro detalle relativo 
a su cntorno, HI resultado podria ser una puerta 
perfectamente pintada en una cadena de montaje 
de coches, o un coche muy bicn lava do en una ca- 
dena automatizada de lavado de automovilcs. Sin 
embargo, en la medida en que se les solicite a los 
robots la realizacion de una mayor diversidad de 
tareas. estas estaran neeesariamente definidas con 
menos daridad. Si tienen que desplazarse por una 
habitation en la cual el contenido cambia dfa a dia. 
deben ser capaces no solo de reunir y procesar in- 
formacion. sino tambien de incorporar nuevas per- 
cepciones en su comprension del mundo. Al robot 
se le debe proporcionar software operative y con- 
trolador, pero es preciso que hay a lugar para que 
este se in ere mente. 

El tratar de crear una mente mecanica pi an tea 
importantcs cuestiones, que de momento aun estan 
sin re solver, acerca de la forma en que piensan y 
aprenden los humanos. Por ejemplo, ^que sabe 
una criatura en el momento de nacer? El humano 
ya adulto, ^es enteramente producto de su entorno 
o de su herencia, y cual es la relacion entre estos? 
( ;Parte el humano con un con junto dc construccio- 
nes internas que lo ayudan a aprender lengua, ma- 
tematicas, etc.?; de ser asi, ^como funcionan? Es 
diffcil responder a estas preguntas sin poder experi- 
ment ar en el cerebro humano. 



Kevin Jo 

Convoy de anticipation 

Es probable que Las tecnicas de 
la robotica produzcan su mayor 
impacto en Ea sociedad cuando 
se Las in corpora a herramientas 
de grado interior para fines 
especiales tales como gruas, 
maquinas escoavadoras, 
vehiculos de reparto local y 
trans porta pesado. En la. 
ilustracibn vemos una maquina 
excavadora robot cargando un 
tren de camiones robot en una 
obra en construction. Cuando 
esta cargado, cad a camion 
avanza semiinteligentemente 
hasta un punto de ensamblaje y 
se engancha por si mismo a un 
tren de camiones. El tren circula 
por las carreteras gracias a la 
energia de los camiones 
individuals que lo componen, 
pero controlado por el 
conductor humano del vehiculo 
gula/La combinacion de la 
capacidad hurnana de decision y 
direccion eon la fuerza brutay la 
primaria inteligencia de los 
robots probablemente 
red Linda Fa en una utilizacibn 
mas racLonal y rentable de los 
re curs os existentes y de la 
tecnologia del tutu ro 
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Poder mental 

Al "Brainstorm", avanzado paquete de software vertical, se le 
considera el primer "procesador de pensamientos" 



EI BrainStorm ha sido calificado como on "procesa- 
dor de pensaniientos*\ pero esto no signifka qoe el 
program a interne emular al cerebro. Lo qoe hace 
realmente el BrainStorm (literalmente, "idea ge- 
nial") es ayudar al usuario a organizar sus pensa- 
mientos. Sera util una analogia con los metodos 
preelectronicos para comprender que hace. 

Cuando se planifica cualquier proyecto com- 
pie jo, resulta util confeccionar listas de Io que se 
tiene que hacer. Una lista de objetivos principales 
generara sublistas de como completar cada punto 
de la lista precedence, y asf sucesivamente hasta 
que el planificador queda totalmente mareado de 
tanto andar revolviendo trozos de papeL Cualquier 
cambio (p. ej., decidir que uno de los puntos de la 
lista principal en realidad debe incluirse en la sub- 
lista de otro punto) puede significar tantos borro- 
nes y enmiendas que el sistema se vuelve inmaneja- 
ble, BrainStorm hace que esta ciase de cambios y 
desarrollos sean tan sencillos como las funciones de 
"recortar y pegar" de que disponen los procesado- 
res de textos; de modo que, al fin y al cabo, la ex- 
presion "procesador de pensamientos" tampoco 
esta tan errada. 

Cualquier elemento de cada lista o sublista 
puede ser promovido , convirtiendose en el titulo de 
una sublista inferior; y, si es necesario cnlazar entre 
si actividades simi lares de listas dife rentes, se les 
puede dar el mismo nombre, aludicndo a ellos 
como tocayos. En ese caso, todo lo que se anada a 
una sublista encabezada por un tocayo le sera ana- 
dido tambien a las otras listas que utilizan el to- 
cayo. 

Quienes esten familiarizados con las mas bien 
host lies facilidades de edici6n de un paquete para 
tratamiento de textos como el WordStar, encontra- 
ran que es muy facil acostumbrarse a las instruccio- 
nes para control del cursor no mncmotecnicas. Pul- 
sando la tecla Control (CTRL) conjuntamente eon la 
tecla S, el cursor se mueve hacia la izquierda, 
CTRL-D, CTRL-E y CTRL-X mueven el cursor 
hacia la derecha, arriba y abajo, respectivamente, y 



estas cuatro teclas forman en el teclado un patron 
Iogico. De todos modos, estas teclas se pueden re- 
definir. A lo que si resulta menos sencillo habituar- 
se es al hecho de que uno puede dcsplazar el cursor 
hacia arriba y hacia abajo mientras esta entrando 
texto, pero tiene que pasar a la modalidad "correc- 
cion" (utilizando CTRL- A) para desplazarse hacia 
la izquierda o la derecha de una Knea, 

Operacibn del programa 

El menu de apertura del BrainStorm ofrece 1 1 op- 
ciones, cada una de las cuales se selecciona median- 
te una letra inicial; la mayoria de estas se explican 
por si solas: Use (usar), Load (cargar), Print (impri- 
mir), ID Drive (para pasar a una unidad diferente 
de la unidad por defecto), Clear (limpiar, para bo- 
rrar de la memoria el modelo actual) .Save (guar- 
dar), Write (escribir, para grabar en disco). Directo- 
ry (directorio), Xit, Merge (mezclar) y Kill. 

Para empezar, el usuario pulsa U y el programa 
entra inmediatamente en modalidad de teclado. Se 
pueden entrar ideas como listas mas o menos alea- 
torias (lo que se conoce como un model: modelo). 
P, ej., un modelo podria estar compuesto por: 

Leer manual 
Comenzar a teclear lista 
Teclear sublista 
Editar lista 

Las instrucciones de control no aparecen de forma 
inmediata. pero se listaran pulsando ?, Desplazan- 
do el cursor hacia arriba hasta cualquiera de los ele- 
mentos de la lista y pulsando CTRL— R, se "promue- 
ve" el elemento designado, el eual pasa a ser el en- 
cab ezami en to de una sublista. Del mismo modo, 
cualquier elemento de esa sublista se puede conver- 
ter en el encabezamiento de una nueva sublista, y 
a si sucesivamente hasta agotar la memoria. Para re- 
tornar a la fista anterior, se pulsa CTRL— C. 

Los elementos se pueden trasladar, ya sea dentro 
de una misma lista como a listas de otros niveles, 
etiquetandolos con el signo @ v utilizando luego 
CTRL-G (de Get: tomar) o CTRL-P (de Put: poner) 
para ejecutar el movimiento. Despues de emplear 
CTRL— G , el signo @ pasa automaticamente al si- 
guiente elemento de la lista; por consiguiente, vol- 
viendo a pulsar CTRL— G se pasara el elemento si- 
guiente, y asi sucesivamente. Esta es una valiosa 
facilidad para trasladar una serie completa de ele- 
mentos a una sublista inferior o superior, 

Si se desea insertar nuevos elementos en una lista 
ya existente, solo hay que desplazar el cursor hasta 
el comienzo de la line a que ha de ir tras el elemento 
nuevo, y entrarlo. Cuando se pulsa RETURN el resto 
de la lista se desplaza una Imea hacia abajo para 
hacerle sitio. Pulsando CTRL— A (de Amend: corre- 
gir) se puede modificar cualquier elemento. 
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- darle el mismo nombre (p, ej,, una fecha) a 
elementos de listas diferentes, estos se convierten 
en tocayos y automatieamente se establece entre 
eflos una referenda cruzada. De modo que si una 
feta dada exigiera que determinado acontecimiento 
sacediera en un dia especial, supongamos el 1 de 
: . • ■ , se pod Ha crear una list a de acontccimicntos 
para esa fecha y ello permitiria actualizar continua- 
menie un horario de las actividades del dia median- 
te la referencia cruzada. 

Se puede crear cualquier cantidad de tocayos y 
:::eder despucs a ellos en secucncia, utilizando 
CTRL— S para la ocurrencia siguiente y CTRL— D 
para la previa, Esto se conoce como una Lista doble- 
mente encadenada circular, de modo que at final de 
la ultima ocurrencia CTRL-S retornara a la 
primera. 

Las listas, por supuesto, se pueden imprimir y, 
per lo general, se las formatea con indentaciones 
que representan los niveles de la lista. Por ejemplo: 



z~:f:r = z?v~v 
Pulsar CTRL - R para promover el efemento de & 
ftsta como un nuevo encabezarniefrto 

[ 3 :sr sublista 
-. a :trl - C para retornar a la lista anterior 

zzz ,s:a 

- :TRL - A para modificar una entrada 

El tamano del indent ado lo especifica el usuario * 

Tambien se pueden editar listas desde fuera del 
BrainStorm, Si han sido salvadas utilizando la ins- 
traccidn W rite-to-disk (grabar en disco), el Word- 
Star y otros program as para tratamiento de textos 
lis reconoceran como documentos, y se las podra 
editar. imprimir y, de ser necesario, volvcr a guar- 
dar. Esto significa. por ejemplo, que se puede utili- 
ze: t. 3 r ii':Stom para preparar la sinopsfe de un 
rr: . _f r -tit sei hiego escrito utilizando un pro- 
para tratamiento de textos, acce- 
^5 .: Zzz medida que 




r i r zz~zz iz . : - r r__~r_ tz?i -z _~ - 
-ji-%izzi-Zi. v£; cue :>:: 
l ea trazDs de papd) que despues 
se oonvemran en trailos de capiruios (bajo los cua- 
les se listan los contenidosj. Si un elemento de un 
capitulo se vuelve lo suficientemente extenso como 
para convertirse en un capitulo separado, esto se 
r^L-de realizar con sum a fadlidad, Del mismo 
modo. se pueden "degradar" titulos de capitulos 
que resulten ser menos importantes de lo que se 
penso en un primer momento. 
De esta forma, el esbozo general del libro empie- 
a surgir y, dado que el WordStar o program as 
saalares pueden acceder a arcbivos del Brain 
Storm, la transformacion de este esbozo en el ma- 
■nscrito acabado va fluyendo naturalmente a partir 
5 primeros procesos intclectuales. Esto signifi- 
ca que no es necesario adoptar los procedimientos, 
bastante laboriosos, del BrainStorm, si uno desea, 
por ejemplo, imprimir a dos o tres espacios. 
El programa viene con un modelo de muestra 



Listas "pensadas" 

£ra/V?Sfofm conjugaun 
program a ortodoxo de 
tratamiento de textos con 
algunas de las caractensticas 
para manipulation de listas 
propias del logo o del lisp. 
Cualquiera de los elementos de 
una lista se puede convertir en el 
titulo de una sublista, lo que 
hace que la creacion de bocetos 
y la organizaci6n de lastareas 
jerarquicas resulten muy 
sencilias. Si dos o mas listas 

poseen elemento sde nomb re 

sdentico ( Hamad os tocayos) que 
sean titulos desublistas, el 
Brainstorm solo mantiene una 
lista con ese nombre y accede a 
la misma cada vez que se llama 
a I tocayo, independientemente 
de en que lista 
se encuentre 



LISTA 1.4 



CUMPLEANDS GENTE 



1) Miguel Delibes 



2) Marhflrt Werner 



LISTA 1,3 Charles Baudelaire 



INGREDIENTES GUISO 



1)Ajo 



/ladimsr I. Ulianov 



LISTA 1,2 



PELIGULAS VIDEO 



t) Amadeus 



LISTA 1.1 



HOCK AND ROLL 



1) Buddy Holly 



LISTA 1 



M0T3VOS DE ALEGRIA 



2 z- 



A) Cumplearips gertte 



2) Mick Jagger 



3) Elvis Presley 



2) Bajo el vQle&i 



3) Beam 



4) Carmen 



4) Buddy Holly 



Rosa Luxemburg 



TOCAYD 1 



BUDDY HOLLY 



1) n. -74X-193fl 



2} Forma tos Crickets 



3) Revolution* el rock n roli 



4) m. 3-11-1959 



(llamado SAMPLE. BRN), que incluyc el esqueleto de 
un planificador de horarios, archive de nombrcs y 
direcciones, una lista de tareas (distribuidas en 
sublistas de "urgentes", u importantes" y "no olvi- 
dar'*), mas una seccion para notas. Este modelo es 
bastante valioso y puede ser an ad i do a los mode los 
propios mediante el empleo de la opcion Merge. 

Aprender a usar el BrainSiorm es facil. El ma- 
nual de hojas sueltas es muy claro (fue escrito utili- 
zando el BramStorm), pero las ins tmcci ones siem- 
pre estan a disposieion del usuario en el menu de la 
pantalla. por lo que la referenda continua al ma- 
nual resuita innecesaria. 

No tod as las instrucciones son mnemotecnicas, 
por lo que algunas podrian resultarle diffciles de re- 
cordar al usuario; pero se proporciona un progra- 
ma INSTALLS, que permite volvcr a configurar 
tod as las instrucciones y alterar los menus para 
adapt arlos a la nucva estructuracion. Este progra- 
ma es muy claro y totalmente activado por menu, 



Brainstorm: Para unas 25 maquinas CP/M, MS- 
DOS y PC-DOS, incluyendo IBM, Siriusy 
Apricot 

Editado por: Caxton Software Ltd., 10*14 
Bedford Street, London WC2E 9 HE, Gran Bretana 
Autores: David Tebbutt y Mike Liardet 
Formato: Disco 
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Mision especial 

Prosiguiendo con el proyecfo, desarrollaremos las rutinas para 
dejar objetos y nos ocuparemos de los escenarios especiales 



La subrutina DEJAR tiene muchas similitudes con la 
rutina RECOGER que dcscribimos en el capitulo an- 
terior. De hecho, podemos utilizar las mismas ruti- 
nas de comprobacion de objetos que se desarrolla- 
ron para utilizar con la instruction RECOGER . En la 
rutina RECOGER se llevan a cabo tres comprobaeio- 
nes del objeto. La primera esta disenada para com- 
probar si la segunda parte de la sentencia de la ins- 
truccion contiene o no un objeto valido, Esto se 
realiza comparando sistematicamente cada palabra 
de la frase de la instruccion con los nombres de los 
objetos de la matriz del inventario, IV$( 5 ), De hallar 
una pareja, se establece una variable, F, que da la 
position del objeto emparejado dentro de la ma- 
triz. Esta comprobacion de validez tambien se debe 
emplear en la rutina DEJAR para comprobar si el 



iSueltalo! 

La logica de la rutina DEJAR es 
similaraaquellade la rutina 
RECOGER, pero solamente la 
validez del objeto y su presencia 
en el inventario del jugador han 
de ser comprobados antes de 
ejecutar la instruccion DEJAR. 
El inventario principal es 
entonces actualizado para 
mostrar un nuevo escenario 
para el objeto, y el nombre del 
objeto eseliminado del 
inventario del jugador 



ENTRADA 



0 




Mensaje error 



Q SALIDA ^ 



-3L 

SALIQA 



Producir mensaje 
"dejas el" objeto 



Registrar 
actual del c 
irwentario 


posicion 
bjeto en el 
principal 







Buscar y suprimir 
description del objeto 
en inventario personal 
del jugador 



I 



SALIDA 



objeto existe y, de ser asf, determinar su posicion 
en el inventario. 

La segunda comprobacion utilizada en la rutina 
RECOGER tambien se emplea en la rutina DEJAR; 
esta comprueba si el jugador lleva e! objeto cspeci- 
ficado en la instruccion en el inventario de objetos 
transportados. ICS(). Obviamente, jel jugador no 
puede dejar un objeto que no este llevando consi- 
go! La tercera prueba utilizada en la rutina RECO- 
GER efectua una comprobacion para asegurar que 
el objeto a recoger este en el escenario en curso del 
jugador, determinado por P, la variable de posi- 
ci6n. Sin embargo, dado que el objeto a dejar debe 
estar en posesion del jugador, su posicidn no apare- 
cera en el inventario principal y, por consiguiente, 
esta tercera prueba no es necesaria en la rutina 
DEJAR! 

Suponiendo que ambas comparaciones produz- 
can un resultado favorable, se deben introduce las 
siguientes modificaciones tanto en el inventario 
principal como en el del jugador: 

1) La posicion del objeto a dejar se especificara 
ahora mediante F, La posicion actual, P, debe 
ahora entrarse en la matriz del inventario principal 
en la posicion IV$(F,2). 

2) La description del objeto debe eliminarse del 
inventario personal de los objetos que lleva consigo 
el jugador, IC$() . La mejor forma de hacerlo es bus- 
car en la matriz hasta hallar el objeto apropiado y 
sustituirlo por una serie mila. 

En el diagrama de flujo vemos la logica de la rutina 
DEJAR. Este es el Ustado de la rutina para el juego 
El bosque encantado: 

3900 REM **** S/R DEJAR 

3910 GOSUB 53G0:REM OBJETO VALIDO 

3920 IF F=0 THEN SN$=' N0 HAY MNGUN "+WS:G0SUB 550Q:RETURN 
3930 ' 

3940 REM M ESTA OBJETO EN INVENTARIO OBJETOS TRANSPORTADOS 
3950 0V=F:G0SUB5450 

3960 IF HF=0THEN SNS= TU M0 TIENES EL M +IV$(F,1): 

GOSUB5500:RETURN 
3970 : 

3980 REM '> DEJAR OBJETO ** 

3990 SN5='DEJAS EL >I +1V$(F,1):GOSUB5500 

4000 IVS(F.2)=STRS(P):REM EFECTJJAR ENTRADA EN EL INVENTARIO 

4010 : 

4020 REM ** EUMINAR OBJETO DEL INVENTARIO DE TRANSPORTADOS 
4Q30 FOR J-1T02 

4040 IF IC$(J)=IV5(F,1) THEN IC$(J)= S| H :J=2 
4050 NEXT J 
4.060 RETURN 

Podemos ver que una de las principals ventajas de 
programar por modulos es que se puede accede r a 
las misrnas rutinas para fines diferentes. Utilizando 
un si sterna de banderas o indicadores, las decisio- 
nes se pueden to mar dentro de breves subrutinas 
sobre las cuales no se actua hasta que el control 
retorne a la rutina que llamd a la subrutina. Un 
buen ejemplo del empleo de esta clase de estructu- 
ra de program a es la prueba de validez que descri- 
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bmos anteriormcnte. Esta subrutina es llamada 
por la rutina RECOGER como por la rutina 
DEJAR. En cada caso, la subrutina toma una deci- 
sion respecto a la validez del objeto incluido en la 
sentencia de la instruction* Sin embargo, el flu jo 
del programa no sufre ninguna alteracion hasta que 
se produzca un RETURN a cualquiera de las dos ruti- 
na*. RECOGER o DEJAR. Solo despues del retorno la 
subrutina de la prueba de validez establece el valor 
de la bandera F, y se produce la bifurcaci6n adecua- 
da. La critica que se puede hacer a esta tecnica es 
que en realidad estamos comprobando dos veces la 
misma condition: una para establecer el valor de la 
bandera y otra para eomprobar su valor. Aunque 
esto es efectivamente asi, la mayor flexibilidad y 
facilidad para la depuration que se consigue me- 
diants el empleo de esta tecnica por lo general com- 
pensa la contrapartida resultante, es deeir, el tiem- 
pode ejecucion ligeramente mayor. 

Escenarios especiales 



► a on panto de nuestro proyecto en 
& nMffrla la pnDeraniacjoo del es- 
riei jne§o: es decs*. Sa programacion que 
perame que d jugpdor leic obijefos ooosago y se 
desplace a traves del mundo de aventoias. Pode- 
idos ahora pasar a la siguiente fase de diseoo. en la 
cual consideramos los escenarios "especiales" 
. " Hizan los objetos, acecban lo^ peligros s 
7.-- .: prueba el ingenio y la destrcza del ;u- 



Antes de analizar con detalle la programacion de 
las ruiinas para uno de los escenarios especiales de 
El hosque encantada, consideremos el codigo que 
debemos introducir en el bucle principal del pro- 
grama para detectar los escenarios especiales, En el 
lisiado se ban de insertar estas dos line as: 

V-2/z27:o ^£h' es especial p? 

.:: - S r = J THEN 300:REM SIGUIENTE INSTRUCCION 

La linea 257 llama a un subrutina para ver si el e sce- 
nario en curso es especial, De ser asf, entonces se 
pooe a uno una "'bandera especial", SF. Esto signi- 
lea qoe caaado d control retorne tlnalmente al 
dd programa, se podra evitar la 
r-jirr ruc:^ r_c >c :c_ri ie las. ins- 
Li wfwmmi qee decide si el escenario 




r : =i EEIE - Izzi-l. -_ES 

: , = fs: --y - :z . 

2730 RETURN 

Recordara que, cuando disenamos el mapa original 
para El basque encanwdo, numeramos primero los 
cuatro escenarios especiales. Por consiguiente, po- 
demos simpiificar la seleccidn de la subrutina apro- 
piada para cada escenario especial haciendo uso de 
k instruction ON.., GOSUB. Tal como se ve a partir 
^e la forma en que se la utiliza en la linea 2720, esta 
■struccidn va seguida por una serie de numeros de 
'-- . , A numero de linea apropiado se selecciona 
de acoerdo al valor de la variable de position, P. Si, 
ror ejempio, P es uno, la instruccion bifurcara 
t GOSUB J a la subrutina que comienza en el primer 
numero de linea de la lista; si P es dos, para la 11a- 
matia GOSUB se utilizara el segundo numero de 
-jinea. y asi sucesivamente. 



Hay cuatro numeros de linea, uno para cada uno 
de los escenarios especiales de El basque encanta- 
da. Si P fuera mayor de cuatro, entonces el control 
pasaria simplemente a la linea siguiente. Si cada 
una de las cuatro subrutinas a las que se puede lla- 
mar desde la linea 2720 establece una bandera, SF, 
se puede detectar el hecho de que P era un escena- 
rio especial. 

De no llamarse a ninguna rutina, la bandera SF 
permanccera establecida en cero, indicando que P 
no es mas que un escenario normal La instruccion 
ON . .GOSUB es, evidentemente, una alternative 
cconomica a la serie de sentencias IF... THEN que 
prueban el valor de una variable y bifurcan conse- 
cuentemente hacia subrutinas diferentes. 

La entrada al tunel 

Dos de los escenarios especiales de El basque en- 
cantado son las dos entradas a un tunel (escenarios 
1 y 4). Para tratar con la simple posibilidad de que 
el jugador desea entrar en el tunel, necesitamos 
construir cuidadosamente una rutina que manipule 
las instmcciones normales y le permita al jugador 
enrxar en el tunel o dar la vuelta y volver al sen- 
ders 

4600 SF=^ 
fl: : ; ~-i -zl-ZZ - _ EI E 

Hie.*-GOSUB5500 
4610 SNS=*PUE0ES BfTRAH BJ B. TUNEL 0 f^ETROCEDER POR EL 

5ENDER0"-GOSLjB55O0 
4620 : 

4625 PRINT:INPUT- IMSTRUCCIONES ;ISS 

4530 GOSUB2500;REM DESC0WP0NER INSTRUCCION 

4635 IF F-0THEN 4625:REM INSTRUCCIOM M0 VALIDA 

4637 GOSUB3000:REM IWSTRUCCIONES NORMALES 

4640 IFMF=1 THEN RETURNS EM EL JUGADOR RETR0CEDE 

4645 IFVF-1 THEN 4625: REM INSTRUCCION QBE DEC I DA 

4650 REM 4 * NUEVAS INSTRUCCIONES ^ 

4655 IF VBS= M ENTRAR M THEN GOSUB 4700:RETURN 

4660 IF VB$= "RETROCEDER'" AND P=4 THEN MF=1:P= 6: RETURN 

4665 IF VBS= ' RETROCEDER " AND P-1 THEN MF=1:P=9:RETURN 

4667 SNS="N0 C0MPREND0 ':G0SUB5500;G0TO4625 

La rutina cmpieza por poner SF a uno para indicar 
el hecho de que se ha llegado a un escenario espe- 
cial. Despues de visualizar un mensaje en la panta- 
11a, de describir la entrada al tunel y las opciones de 
que dispone el jugador, se solicita una instruccion, 
Nuevamente, en vez de reinventar la rueda cada 
vez que deseamos analizar una instruccion, pode- 
idos sacar partido de la construccion modular del 
programa pom llamar a las subrutinas "descompo- 
oer insmicdra" e i_ iosmicci6ri normal" desarrolla' 
das jma utilizaT en las ruunas RECOGER y DEJAR. 
CooskieraDdo aiidadosamenie los estados de las 
diversas banderas establecidas por estas dos subru- 
tinas, podemos transferir el control al interior de 
nuestra nueva rutina segun se requiera. Analice- 
mos estas banderas de forma individual. 

La bandera F establecida por la rutina u descom- 
poner instruccion" indica si la instruccion que se le 
ha pasado tiene un formato valido. Si la instruccion 
es de una sola pa la bra no reconocida por la rutina, 
entonces F toma e! valor cero, en cuyo caso querre- 
mos saltar hacia atras del bucle para tomar otra ins- 
truccion. 

La bandera MF es establecida por la rutina 'Ins- 
truccion normal" si se requiere la descripcion de un 
escenario; esto sucede cuando se genera una ins- 
truccion AVANZAR o MIRAFL Un RETURN al bucle 
principal del programa permitira cl desplazamiento 
basta un nuevo escenario en el primer caso, o que 
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se describa el mismo escenario y se vuelva a entrar 
a la rutina especial, en el segundo caso. 

La rutina 'Instruccion normal" esUiblece, asimis- 
mo ? la bandera VF. Un valor de uno indica que se 
ha reconocido y obedccido la instrucci6n, en cuyo 
caso saltariamos hacia atras de! bucle para la si- 
guiente instruction. Si VF <> 1, la instruction no 
es ninguna de las normales. Habiendonos ocupado 
de las posibilidades de instructiones normales, po- 
demos anadirle nuevas instrucciones a esta rutina. 
En este caso, se incluyen dos; ENTRAR. para pene- 
Irar en el tune I. y RETROCEDER, para alejarse un 
escenario desde la cntrada al tune!, Puesto que esta 
rutina esta disenada para funcionar para las dos en- 
tradas al tunel, la instruccion RETROCEDER ha de 
eonsiderar cual de las dos entradas al Uanel esta sal- 
vando el jugador; ello lo indica P segun sea su valor 
1 o 4. Por to tanto, P se puede poner a cero antes de 
dejar la rutina, de modo que al volver a entrar en el 
bucle principal del programa se produce un cambio 
de escenario. 



Listados 
de "Digitaya" 

1190 GOSU 62670; REM ES ESPECIAL P 

1200 IF SF=1 THEN 1250:REM SIGUIENTE BUCLE 

2360 REM " S/FL DEJAR " 

2370 G0SUB573D:REM ESVAUDO EL OBJETO 

2380 IF F=0 THEN PRINT" NO HAY NINGUN";WSi;RETURN 

239: 

240D REM ' ' LLEVA EL JUGADOR EL OBJETO? " 1 
2410 OV=F:G0SUB5830 

2420 IFHF=0THENPRINT"TU W0 TIENES EL";WS(F,1):RETURN 

2430 : 

2440 REM ** DEJAR EL OBJETO rr 

2450 SNS = " DEJAS E L" + 1VS( F , 1 ):G0S UB5880 

2460 IVStF.EJ^STRKniREMACTUALIZARPOSICION OBJETO 

2470 : 

2480 REM ~ SUPRIMIR EN LI ST A 0 B JETOS TRAM SPQRTADOS " 
2490 F0RJ=1T04 

2500 IF ICS(J ) - 1VS(F, 1 )TH EM I CI(J) = " " : J= 4 
2510 NEXT J 
2520 RETURN 

2670 REM; S/R ES ESPECIAL 

2680 S F = 0: R EM RESTAU RAR BAN 0 ERA ESPECIAL 

2710 ON PGQSUB 2850,2960,3450.3830,4180.4550,5150 
2720 RETURN 

2650 REM S.'RTOMATV "'■ 
2860 SF=1 

2370 SNS- "HAS EMTRADO EN LA TOM A DEL TELEVISOR Y NO TIENES 
ESCAPAT0RIA." 

2880 SNS = SNS + " ESTAS CON DEN ADO PARA S I EM PRE ASERUNINV ITADO 

OE UN PROGRAMA DE TERTULIA DE LA TV" 
2890 6OSL)B5880-REM FORMATEAR IMPRESION 
2900 PRINT 

?9 ' Q PRINT" BIE N VE N 1 0 0 A _ PR CG RA Ml A " 

2920 FORJ=1T0500;NEXTJ 
2930 GOTO 2910 
2040 END 

3830 REM PUERTA PALANCA MANDOS 
3840 SF=1 

3850 SNS- "UN USUARIO CON LOS 0JQS ENR0JECID0S DISPARA 
REPETIDAMENTE SU LASER CONTRA Tl." 

3660 GOSDB5880:REM F0RMAT0 
3870 : 

3880 REM " INSTRUCCIONES " 

3890 RD-RDN(TI):IF RD> 65THEN 41 10:REM ACERTAO0 

3900 PRINT: INPUT" I NSTRU CC 1 0 NES " JSS 

3910 GOSDB 1700:GOSUB 1900;REM ANALIZAR INSTRUCCION 

3920 I FMF- 1 THENM F = 0:PR INT* N 0 PU EDES 

MOVERTE. . .TOD AVI A" GOTO3880 
3930 I FVF= 1 TH EN3680 : R EM SIGU IE NTE I NSTRUCC 1 0 N 
3940 IF VB$o"USAR" THEN PRINT" NO COMPRENDO' , :GOT03880 
3950 GOSDB5730:REM ESVALIDO EL OBJETO 

3960 lFF=OTHENPRINT"N0 HAY Nl NG UN 11 ; NN$:GOT038BO : REM SIGUIENTE 

INSTRUCCION 
3970 : 

3960 REM " ES EL OBJETO ESCUD0 LASER" 
3990 IF F=3THEN4Q20:REM OK 

4000 S NS= U TU * + 1 VStF .1 J + " NO Si RVE" :G0SU B5880 : GOTO3880 
4010 : 

4020 OV^3:GOSUBS830;REM TIENE CONSIGOEL ESCUD0 LASER 
4030 I FH F - 0TH ENSN I = ,l TU N 0 Tl EN ES EL 
" + I VS (3,1): GOSU B58 SO ;GOT03880 



4040 : 

4050 REM "SALVADO ,T 

4060 SNS="UTIL1ZAS EL ESCUD0 LASER PARA PROTEGERTE, UNA RAFAGA 
TE ARR0JA" 

4070 SN£=SN&4 "FUERA DE LA PUERTA PARA PALANCA DE MANDOS Y TE 

HACE ENTRAR 0TRA VEZ EN LA MAQUINA." 
4080 GOSUB5680:REMFORMATO 
4090 P= INTtRND(Tl) *40 + 7) :MF=1: RETURN 
4100 : 

4110 REM ~* ACERTADO 

4120 SNS= ,S HAS SID0 ALCANZADO POR EL LASER Y APENAS SI ERES 

CONSCIENTE DEQUE" 
4130 SNS=SN$+"TUS AT0MQ5 HAN GUEDAD0 DISEMINADOS POR LAS 

CUATR0 ESQUINAS* 
4140 SNS- SNS +" DELUNIVERSO" 
4150 GDSUB5880:REM T0RMAT0 
4160 END 

5150 REM S/R PUERTA A LA MEMORI A "~ 
5160 Sf=1 

5170 SNS="ERES REClBlDO POR UN PORTERO QUETE DICE QUE NO PUEDES 

SER ADMITl DO' 
5180 SNS- SNS -A MEN0S QUE DES UNA DIRECClON": 

5190 REM * * INSTRUCCIONES ** 

5200 PftlNTrtNPUT-iNSTRUCCIONESMSS 

521 0 GOSUB1 700:GOSUB1 9O0:REM ANALIZAR 

5220 IF MF=1 THEN RETURN; REM IRSE 

5230 IFVF=1 THEN 5200:REM SIGUIENTE INSTRUCCION 

5240 IF VBS< > " DAR'TH EN PRINT" NO C0MPREND0": 

GOTO 5200 
5250 : 

5260 G0SUB5730:REM ES VALIDO EL OBJETO 

5270 I FF— 0TH EN PR I NT" NO HAY NINGUN";WS;GOTO5200:REM SIGUIENTE 

INSTRUCCION 
5280 : 

5290 REM " ES EL OBJETO UNA DIRECClON " 
5300 IFF=1 THEN5330:REM0K 
5310 PRINT 'EL NECESITATU DIRECClON ,h ;GOTO52O0 
5320 : 

5330 0V=1;GQSUB5830:REM LLEVA CDNSLGO LA 

DIRECClON 
5340 IF HF=1 THEN 5370 

5350 SNS-"N0TIENESLA--IV$(1.1):G0SUB5880: 

GOTO520O 
5360 : 

5370 REM "OK PUEDE PASAR" 
5380 SNS="EL PORTERO EXAM IN A TU DIRECClON YTE 
PEJRMrfE' 

5\s- E\5 • E'JRAR' .GOSUB5R80 
5400 P=40 MF=1:RETURN 



Complementos al basic 

Spectrum: 

En a m bos programas reem place los siguientes 
nombres de variables: SNS por SS. NNS por RS, 
IVSQ porVS(,), ICS por ISO. 'SS POrTS, VBS 
porBS. 

En el listado de El bosque encantado sustituya las 
siguientes lineas: 

2720 IFP=1 THEM GOSUB4590 
2722 IFP=2THENGOSUB4690 
2724 IFP=3THENGOSUB4790 
2726 IFP=4THEM GOSUB4590 

En los listados para Digitaya reemplace estas 
Kneas: 

2710 IFP=1 THEN GOSUB2850 

2711 IF P=2 THEN GOSUB2960 

2712 IFP=3THENGOSUB3450 

2713 IFP=4THENGOSUB3830 

2714 IFP=5THEN G0SUB4180 

2715 IF P=6 THEN GOSUB4550 

2716 IFP=7THEN G0SUB5150 
3890 LET RD=PiND(1) 

4090 LETP=INT(RND(1)*404-7) 

BBC Micro: 

En los listados de Digitaya reemplace estas lineas: 

3890 RD=RND(1) 
4090 P=RND(40)+7 
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La prueba 
del ti empo 

Examinemos una de las 
primeras maquinas portatiles 
compatibles con IBM que 
aparecieron en el mercado: el 
Compaq Plus 



El lanzamiento en Estados Unidos del IBM Perso- 
nal Computer confirio cierta respetabilidad al mi- 
croordenador. Los hombres de negocios, que hasta 
eatoores habian considerado tales dispositivos 
como pooo mas que artflugios novedosos, se sin tie- 
ma fefices de comerrirse en clientes del celebre gi- 
game de la mdostna de ordenadores. Dado que las 
firmas de softv. are comenzaron a crear un Lngente 
numero de programas para el IBM, fue ine\iiable 
que muchos fabricantes de hardware produjeran 
ordenadores capaces de ejecutar el software IBM y 
aprovecharan de este modo la inniensa base de ' 
software que se estaba acumulando. 

Una de las pioneras en este campo fue la Com- 
paq Computer Corporation, empresa creada espe- 
cificamente para producir una maquina portatil 
compatible con IBM: el Compaq Plus. Hi modelo 
que vamos a examinar aqui es la versi6n de 256 
Kbytes con unidades de disco gemelas, si bien exis- 
versiones de la maquina con una sola unidad o 
con un disco ngido fijo de 10 Mbytes. 

Teclado y pantalla 

"Portattl" tal vez sea un termino erroneo para una 
maquma que pesa 14 kg: ciertamente es dificil trans- 
mas alia de una corta distancia- Compaq 
► dprobkmaque s*ipooe trasladar un 
■ y hi r: : r . no riado no asa \inflica 





de ordenadores 

pom ih I Mil 1 1 deJ ordenador. Dado que d asa 
para transportailo esta mstabda en la parte trasera, 
ello significa que el teclado sirve aamrsmo como 
base. No obstante, la maquina es de construction 
soiida y el teclado parece aceptar el peso y el consi- 
guiente traqueteo bastante satisfactoriamente. La 
unidad completa tiene un tamarlo aproximado al de 
una maquina de coser. Una vez desenganchado, el 
teclado se conecta al ordenador mediante un cable 
en espiral. El fabricante afirma que esto permite 
iiiuar el teclado de manera que se pueda ha liar la 
position de trabajo mas comoda. Sin embargo, si se 
separa de la unidad mas de unas ocho pulgadas, 
comienza a ser es tirade por la espiral del cable, li- 
mitando por lo tanto la distancia entre la pantalla y 
el usuario* Esto se podria habcr solucionado con un 
cable mas delgado. 

El teclado, al igual que el propio ordenador. 
posee patas plegables que permiten colocarlo en 



angulo para trabajar con comodidad. Tal como uno 
esperaria de un ordenador de oficina como el Com- 
paq Plus, las teclas son fiables y faciles de usar. La 
disposition del teclado es identica a la del IBM-PC, 
con 10 teclas de funcion junto al lado izquierdo de 
las teclas de maquina de escribir, y un teclado nu- 
merico en el lado derecho. La ventaja obvia de esta 
disposici6n cs que los usuarios que esten habitua- 
dos a la del IBM podran utilizar el teclado del 
Compaq instantaneamente sin tener que aprender- 
t va position de las teclas. La desventaja 
reside en que el teclado del IBM no es el ideal y. 
porcoosigttieate. se reproduce n los mismos proble- 
de dfeeno. La teda Enter de: IBM e> del 
imano que las otras teclas. por lo cual ha- 
llarla resulta dificil. Lo que quiza sea mas grave 
para quienes escriben al tacto es que la teda Shift 
no esta en el lugar habitual, es decir, debajo de la 
tecla A. Esta position la ocupa, en cambio, la barra 
invertida, lo que significa que el mecandgrafo al 
tacto se pasara, al menos en principio, puisando 
continuamente la barra invertida cn vez de Shift. 
Estos problem as se reproducen en el Compaq . 

Cuando se ejecuta el MS-DOS (la version Micro- 
soft del PC-DOS), las teclas de funcion situadas a la 
izquierda del teclado actuan como medios auxilia- 
res a la edition. Est as funciones varian a tenor del 
program a de aplicaciones que se este ejecutando. 
Con el basic, por ejemplo, se convierten en teclas 
de entrada de palabras clave individuals, tales 
como LOAD, SAVE y LIST. Las maquinas MSX utili- 
zan un sistema similar para las teclas de funcion. 



"Compaqtando" 

Las lineas suaves y bien 
definidas de la carcasa del 
Compaq se repiten en et sencillo 
panel frontal yen el moderado 
facsimil del teclado del IBM-PC. 
A ambos lades de la carcasa, 
unas ta p as dan acceso a las 
puertas y a la fuente de 
alimentacidn el£ctrica h como 
asimismo a un espacio de 
almacertamiento para el cable de 
potencia y el enchufe de la red, 
j un punto important^ y en 
ocasEOnesmenospreciado! 
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El teclado numcrico situado a la derecha del te- 
clado tiene una doble funcion . En operation nor- 
mal, se lo puede emplear para dcsplazar el cursor a 
traves de la pantalla, pero si se pulsa la tecla Num 
Lock se lo puede utilizar a modo de calculadora. 

La pantalla es un monitor vcrdc estandar de 17,7 
x 13,3 cm, con una resolution de 80 x 25 caracte- 
res. El tcxto se lee facilmente y a la derecha de la 
pantalla hay un control de brillo. En el lado izquier- 
do estan las unidades gcmclas de disco flexible de 5 
1/4 pulgadas. Debido a que la configuration estan- 
dar del Compaq Plus es una unica unidad de disco, 
el disco maestro del sistema MS-DOS dara por scn- 
tado que es este el caso y pedira que todos los dis- 
cos se coloquen en la unidad A; csto puede ser una 
molestia cuando se esta copiando uno, porque el 
usuario tiene que intercambiar los discos continua- 
mente, Sin embargo, el MS-DOS se puede configu- 
rar para hacer un uso completo de las dos unidades. 
Las unidades propiamente dichas parecen ser mas 
silenciosas que sus equivalentes IBM. 

Conexiones al exterior 

Debajo de un panel al lado dcrccho de la maquina 
estan las puenas de interface. El Compaq Plus esta 
equipado con una puerta para impresora en parale- 
io tipo Centronics, una interface RGB y una puerta 
RE Tambien se proporcionan trcs ranuras de am- 
pliation, permitiendo in st alar p lac as con conectores 
compatibles con IBM, Las ampliaciones tipicas son 
placas de memoria extra, una tarjeta de color VDU 
o un modem que le permita al ordenador comuni- 
carse a traves de la red teletonica. Debajo de otro 
panel situado en el lado izquierdo esta la entrada de 
potencia (un Eurosocket estandar de tres patillas), 
encima de la cual esta el interrupter on/off. A uno 
de los lados esta el ventilador que mantiene frio el 
interior de la maquina, Dentro del ordenador, el 
sistema de circuitos esta protegido por una carcasa 
metalica (motivo, en parte, del peso de la maqui- 
na); esta no solo ofrece proteccitSn contra manejos 
bruscos, sino que tambien hace de escudo contra 
las interference as de radio que pudieran perturbar 
el proceso. Ei metal actua asimismo como disi- 
pador. 

El ordenador vienc acorn pan ado de tres manua- 
les: una gin a de funcionamiento y guias de referen- 



cia de MS-DOS y de basic. I n soli tarn en te, tratan- 
dose de este tipo de maquina, las guias estan encua- 
dernadas en forma de libro y no son las usuales car- 
petas de anillas. Los libros vienen junto con los dis- 
cos del sistema en carpetas plasticas imitation de 
ante. De los tres manuales, solo la guia para opera- 
dores tiene un enfoque didactico. De modo que 
quien desee documentarse sobrc los diversos pasos 
de la utilization del basic o del MS-DOS hara 
mejor en adquirir otros textos de enserianza. 

Como una de las mas antiguas maquinas com- 
patibles con IBM, el Compaq, al igual que el pro- 
pio IBM-PC. utiliza el proccsador Intel 8088 en vez 
del chip 8086 mas avanzado que emplean algunos 
de sus competidores mas recientes. como el Olivetti 
M25. Si bien el 8088 es un procesador de 16 bits con 
un bus de directiones de 20 bits, posee un bus de 
datos de 8 bits, a diferencia del 8086. que posee un 
bus de 16 bits. Esto significa que el Compaq es 
mucho mas lento para recuperar datos que sus riva- 
les que poseen el 8086, aunque, por supuesto, 
opera a la misma velocidad que el PC. 

Respecto a la cuestion, sumamente importante, 
de la compatibiiidad con el software IBM, el Com- 
paq Plus se encuentra en una position muy airosa. 
Hasta un programa tan dificii como el Lotus 1-2-3 
se puede ejecutar en la maquina, Sin embargo, 
quiza este hecho no resulte sorprendente si se tiene 
en cuenta que el presidente de Compaq tambien es 
miembro de la junta directiva de Lotus Software. 
Una de las pocas cosas que el Compaq Plus no 
puede ejecutar es el disco de diagnostics IBM; 
pero, puesto que ese programa interroga directa- 
mente a la ROM del sistema de E/S de basic 
(BIOS: basic Input-Output System), ello tampoco 
ocasiona inconvenientes. 

El Compaq Plus es, en definitiva, una de las ma- 
quinas compatibles con IBM mas fiables que exis- 
ten en el mercado, con una trayectoria ya probada. 

En el aspecto negative, la maquina esta empe- 
zando a dar muestras de su edad, y no solo por el 
chip 8088, ya anticuado* Esta empezando a dar la 
sensation de que estan contados los dias de los mi- 
cros " transport ables v de mas de 10 kg. Con el ere- 
ciente y continuo pe rf e ccion am ie n t o de los ordena- 
dores "de regazo' 1 , la aparicion de una maquina de 
este tipo compatible con el IBM es solo cuestion 
de tiempo. 



Costo-prestaciones 

Los principales argumentos de venta del Compaq 
Plus son su compatibiiidad con IBM y t por 
consiguiente, e! acceso a la enorme base de 
software IBM. Aqui se puede apreciar el costo de 
un sistema IBM-PC equiparable a las 
especificaciones basicas del Compaq Plus: 



Configuration 


Compaq Plus 


IBM-PC 


Precio basico 


£ 2 524 


£ 1 310 


Discos gemelos 360 K 


estandar 


341 


Pantalla color aita res. 


estandar* 


300 


Tarjeta salida monitor 


estandar 


208 


Tarjeta graficos color 


estandar 


223 


128 K de RAM 


estandar 


86 


Sistema operativo y basic 






basado en disco 


estandar 


61* 


Teclado 


estandar 


213 


Total 


2 524 


2 742 



* La pantalla incorparada es monocromatica de alta resolucidn, 
pero el Compaq posee una salida en color RGB como estandar. 




Placa 

impresora 

Esta placa con una interface 
para impresora en parafelo 
permite conectar la maquina a 
una impresora de tipo 
Centronics 



Placa VDU . 



Seencaja en una de las 
puertas para amptiacion y 
proporciona el sistema de 
circuitos necesario para 
activarun televisor o pantalla 
externa 

Placa de circuitos 
principal 



Contiene los 256 K de RAM r el 
procesador 8088 y los chips 
de entrada/salida. Asimismo 
hay disponibies ranuras litres 
para chips extras tales como 
el procesador de matematicas 
8087 



Fuente de 

alimentation electraca 

Esta instaladaaqui, con un 
ventilador por detras para 
mantener refrigerado el 
interior de la maquina 





Teclado estilo IBM 

Es identicc a la version IBM. 
Observe las teclas de funcion 
a la izquierdayel teclado 
numerico a la derecha 
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Piaca interface en serie 

Esta placa, dotada de una 
puerta aprapiada, permite las 
comunicaciones entre el- 
ordenadory un dispositive en 
serie, como una impresora 

Puerta RF 

Permite conectar la maquina a 
un televisor normal 



Interlace RGB 

^ Permite conectar el ordenador 
a una pantalla en color para 
sacar el maximo partido de las 
capacidades para graficos 



Carcasa m eta Ilea 

Rodeatodo el stsiema de 
circuitos, Cumple las 
funciones de disipador y de 
caja de Faraday, para reducir 
ta interferencia exterior y 
ofrecer cierta protection para 
la electron ica. jYtambien 
aumenta e! peso de la 
maquina! 




Ranurasde ampliation 

Permiten la adicion de otras 
placas de ampliation e 
interface con otros 
dispositivos extern os 



Unidades de disco 

Las unidades de disco flexible 
de 5 va pulgadas permiten 
que la maquina opere bajo 
MS-DOS. El Compaq portatil 
se puedeadquirir con una sola 
unidad o con unidades 
gemelas 



COMPAQ 
PLUS 



DIMENSIONS 



480 x 400x 200 mm 



Intel 8088, 4,7 MHz 



MEM0RIA 



256 K de RAM, ampliables a 
640 K 



PANTALLA 



Textos: 25 filas de 80 columnas. 
Graficos: 640 * 200 pixels 



INTERFACES 



Impresora en paralelo ttpo 
Centronics, RGB y un enchufe 
hembra RF; Tambien hay ranuras 
de ampliacidn que permiten 
instaiar otras placas de interface 



LENGUAJES 



basic cargado desde el disco 
maestro del sistema 



TECLAD0 



47 teclas tipo maquina de 
escribir, 14 teclas de control, 10 
teclas de fundon y 10 teclas de 
funcion para calculo 



DOCUMENTACION 



Se suministran tres manuales: 
una gufa de fun cionam lento, una 
gma de referenda del MS-DOS y 
una gufa de referenda de basic. 
De ellos solo la gufa de 
functonamiento Neva al lector 
paso a paso a traves de los 
procedimientos, Los 
principlantes deberan adquirir 
otros manuaies con fines 
didScticos 



VENTAJAS 



La construed on de la maquina 
es sdlida y su compatibilidad con 
el IBM-PC esta demostrada 



DESVENTAJAS 



El peso de la maquina la coloca 
mas bien en la eategorfa de 
"transportable". Asimismo, el 
Compaq Plus esta en peligro de 
ser superado par la tecnologia 
mas reciente 
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Esta version de este famoso juego de accibn ha sido escrit a para 
el M05 de Thomson, Tambien esta disponible para el TO 7 




Dos jugadores se enfrentan para dividirse el espa- 
cio vital. Cada uno de ellos debe esforzarse, mien- 
tras va desplazandose, por no cortar en ningun mo- 
mento su trazado o el de su adversario ni salirse del 
rectangulo dibujado en la pantalla. Utilice las pa- 
lancas de mando o las teclas siguientes: 
Jugador de la derecha: P, L M y @, 
Jugador de la izquierda: Z ? Q, S y W. 



10 REM ********** 

20 REM " TRAZOS * 

30 REM * 

40 CLEAR „1 

50 G0SU8 750 

60 ON JK GOT0 130 

70 DS=INKEY$ 

80 HB=fD$= i r'HD$^M") 

90 V8=(0S= i £| P ,, )-(D$="@") 
100 HA=(D£= 4l Q") -(D$- "S") 
110 VA=(DS="Z")-{DB= k W") 
120 GOTO 170 

130 H A = (STIC K(0) = 7) - (STI CK(0) = 3) 

140 VA=(STICK{O)=1)-(STICK(0)=5) 
150 HB=(STICK(1)-7}-(STJCK{1)=3) 
160 VB=(STICK(1)*1)-(STICK(1)=5) 
170 IFHAoOTHEN H1 = HA:V1^0 
180 IFVA<>OTHENV1=VA:H1=0 
190 IFHB<>OTHENH2=HB;V2=0 
200 IFVB<>OTHENV2=VB:H2=0 
210 X1=X1 + H1 
220 Y1=Y1+V1 

230 IFSCREEN(X1 ,Y1) =127 THEN 350 

240 LOCATE X1.Y1 

250 COLOR 3 

260 PRINT NS; 

270 X2=X2+H2 

230 Y2=Y2+V2 

290 IFSCREEN(X2,Y2)=127THEN41Q 

300 LOCATE X 2, Y2 

310 COLORS 

320 PRINT N$; 

330 BEEP 

340 GOTO 60 



350 F2=F2+1 

360 G0SUB 690 

370 IFF2=1GTHEN470 

380 IF INKEYSo' 1 " THEN 380 

390 GOSUBS70 

400 GOTO 60 

410 F1=F1+1 

420 GOSUB690 

430 IF F1 =10 THEN 540 

440 IF INKEYSo '" " THEN 440 

450 GOSUB 870 

460 GOTO 60 

470 CLS 

480 COLOR 1,7 

490 LOCATE 9,5 

500 PRINT "GANA JUGADOR DERECHA"; 

510 LOCATE 15,10 

520 PRINT F2;"A" F1; 

530 GOTO 600 

540 CLS 

550 COLOR 1,7 

560 LOCATE 9 5 

570 PRINT "GANA JUGADOR IZQUIERDA' 1 ; 

580 LOCATE 15,10 

590 PRINTF1;"A";F2; 

600 LOCATE 14,15 

610 PRINT "0TRA?"; 

620 IF INKEYSo" " THEN 620 

630 DS-INKEYS 

640 IFD$=" "THEN 630 

650 IFD$o"N" THEN RUN 

660 CLS 

670 SCREEN 4,6,6 
680 END 



690 FOR 1=1 TO 5 
700 BEEP 

710 FOR J=1 TO 100 
720 NEXT J 
730 NEXT I 
740 RETURN 
750 GLS 

760 SCREEN 2,4,4 

770 DEFINTA-Z 

760 ATTRB1.1 

790 LOCATE 6.10,0 

800 PRINT "PALANCAS DE MANDO 

810 fi$=INKEY$ 

320 IF RS=" " THEN 810 

830 JK=-(R$="0") 

840 ATTRB 0,0 

850 DEFGR${0) =255,255,255,255,255,255,255 255 

860 NS=GRS(Q) 

870 CLS 

3B0 COLOR 2 

890 FORX1=0T0 39 

900 LOCATE X1,0:PRINT NS; 

910 LOCATE X1 , 23;PRf NT NS 1 

920 NEXTX1 

930 FOR Y1 =1 TO 22 

940 LOCATE 0.Y1: PRINT NE; 

950 LOCATE 39, Y1: PRINT NS; 

960 NEXT Y1 

970 LOCATE 2,24:C0LQR 3 
980 PRINT "JUGADOR IZQUIERDA :";F1; 
990 LOCATE 22,24 :C0LOR 5 
1000 PRINT "JUGADOR DERECHA :";F2; 
1010 X1-8:Y1=11;X2=32:Y2=11:H1=1:V1=0 
1020 H2= - 1 ;V2 -GS1 =0:S2=0;RETURN 
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En primer piano 

En esta ocasion estudiaremos distintos tipos de visualizacion de 
datos y desarrollaremos una rutina para crear graficos de barras 



Los graficos de barras son un sencillo metodo grafi- 
co de representar ciertos tipos de datos nu men cos. 
El objetivo de un grafico de barras es ayudar a en- 
tender a simple vista un conjunto de cifras sin tener 
que examinarlas con mayor detalle. Existen inu- 
chos programas para graficos de gestion para trazar 
graficos de barras, graficos de tarta e histogramas, 
y cstos programas a menudo estan enlazados con 
hojas electronicas de mo do que sc pucdan visuali- 
zar los valores calculados en las mis mas. 

Nosotros, por el momento, no seremos tan ambi- 
oosos. sino que comenzaremos por analizar como 
dibujar un grafico de barras utilizando el loco. La 
version del programa que vamos a considerar es 
para el Commodore 64; para ejecutar el programa 
en otras maquinas, el lector habra de remitirse a los 
Complements al logo, que incluyen los cambios 
necesarios en cada caso. 

El proceso del dibujo de un grafico de barras se 
divide en tres etapas: 

a) tomar la entrada; 

b) hallar el valor mayor (esto es necesario para que 
podamos colocar a escala las columnas de modo 
que quepan en la pantalla); 

c) dibujar el grafico de barras, a escala apropiada, 
y anadir luego las etiquetas* 

El proce dim lento de nivel superior se denomina 
GRAFICOBARRAS.INIC establece el valor de una can- 
tidad de constantes que necesita el programa, Reu- 
nion do las todas en un mismo lugar se simplifica la 
labor de introducir modificaciones. CO LORES con- 
-'.z:v- [ista de coiores a utilizar para las columnas: 
aook agrada nuestro esquema de color, jcambie- 
lo* Tal como esta. el programa imprimira un maxi- 
mo de 15 cohimnas. de modo que solo se necesita- 
ran 15 coiores como maximo. 

Entrada y calculo 

La entrada que se requiere consta de dos daios 
para cada una de las barras del grafico: pnmero. el 
titulo a imprimir al pie de la barra y. segundo, la 
can tidad o el valor de la barra, o sea, su altura. En 
nuestras rut in as de entrada hemos incorporado al- 
gunas seneiOas comprobationes de verification 
para asegurar que la entrada sea sensata, TOMAR, 
ENTRADA divide en dos partes la tare a de obtener la 
entrada, toman do los tftulos para cada column a e 
insertando los valores correspondientes. Cuando 
acabe de entrar los datos, digite FIN como el si- 
guiente "titulo". 

TOMAR J ITU LO acepta el titulo; rechazara una en- 
trada en bianco pero acepta ra cualquier otro valor. 
TOMAR.CANTIDAD aceptara como entrada solo un 
numero; cualquier otra entrada hara que el progra- 
ma solicite que los datos sean reentrados. Cuando 
TOMAR -ENTRADA posee un par nombre/numero va- 



lido, este se anade al final de una lista de elementos 
de datos. Los elementos se deben entrar por el 
orden en el que uno desea que se tracen en la pan- 
talla, de izquierda a derecha. 

CALCULAR utiliza TOMAR, MAX para hallar el valor 
mayor y luego emplea este para establecer una es- 
cala. Una regla comun es que la altura del grafico 
de barras debe ser de aproximadamente las tres 
cuartas partes de la anchura. 

DIBUJAR. GRAFICO calcula la anchura de cada 
barra del grafico. dibuja un eje hacia arriba de la 
pantalla. colorea y etiqueta las barras. 

La anchura se calcula como un multiple de ocho, 
Ello se hace con e! fin de evitar algunos problemas 
originados por la forma en que el Commodore 64 
\isuajiza los coiores. porque en la mod alidad para 
graficos normal del logo no se pueden tener dos 
coiores en el mismo bloque de 8 x 8 pixels. DI- 
BUJAR. EJE dibuja la lfnea hacia arriba de la pantalla 
y marca en ella el mayor de los valores de los datos; 
esto nos proporciona una forma sencilla de estimar 
los valores de las columnas. 

Debemos retroceder desde la linea del eje antes 
de imprimir este numero junto a la mascara que 
indica el valor mayor. El espacio a retroceder, de 
modo que el numero no se imprima sobre la line a, 
depende de cuantos digitos tenga el numero. Este 
probiema se resuelve facilmente, porque el logo 
trata los numeros como si fueran palabras, de ma- 
nera que podemos utilizar CONTAR para determinar 
la longitud del numero, y luego emplearlo para de- 
terminar cuanto se ha de retroceder. 

ESCRIBIR imprime un mensajc en la pantalla para 
graficos. Toma tres entradas: las distancias de 
pasos x e y para cada caracter y el nombre a escri- 
bir. Se vale de una primitiva, STAMPCHAR, que im- 
prime un caracter en la pantalla para graficos, en la 
position de la tortusa. 

DIBUJAR, GRAF! C01 Ileva a cabo la tarea de di- 
bujar las barras. Toma cada elemento de uno en 
uno. selection a el siguiente color a utilizar, somete 
a escala la altura y le pasa el verdadero trabajo a 
RELLENAR. que simple m en te recorre la barra de 
arriba abajo rellenandola. ETIQUETA emplea ESCRI- 
BIR para escribir las etiquetas verticalmente hacia 
abajo de la pantalla (las muy largas se desplazaran 
y apareceran en la parte de arriba de la pantalla). 

Graficos de tarta 

Los graficos de tarta son otra forma muy comun de 
representation grafica. Si desea escribir un progra- 
ma para dibujar un grafico de tarta, he aqui algunas 
pis t as: 

* Los datos se obtienen exactamente de la misma 
forma que en el caso del grafico de barras. 

• La section de ca leu los consiste en totalizar los 
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numeros y determinar a partir de este dato que por- 
tion les corresponded de los 360° que constituyen 
la "tarta". 

• Dibujar y rcllenar los trozos de la tarta es bas- 
fantc sencillo, pero en el Commodore 64, al menos, 
usted tendra algunos problemas dcbido a la forma 
en que los colores se invaden entre si. Es una buena 
idea aplicar la modalidad de "color doble"; tan solo 
utilice D0UBLEC0L0R en lugar de DRAW en el pro- 
cedimiento que dibuja el grafico. Si aun asi tuviera 
problemas, deje un "agujero" de 10 unidades en el 
centro del grafico de tarta. 

El etiquetado se puede reaiizar de la misma forma 
que para el grafico de barras. si bien podrian plan- 
tearse problemas al posicionar la tortuga antes de 
efectuar la escritura. 

Despucs de que logre este grafico, £por que no 
tratar de escribir un programa que dibuje tanto un 
grafico de barras como uno de tarta para los mis- 
mos datos, uno junto al otro? 



Complementer al logo 

Muchas versiones de logo no poseen un equivalents 
para STAMPCHAR, lo que hace que imprimir 
caracteres en la pantalla para graficos resuJte muy 
diffcil. 

Para las diferentes maquinas sera necesario alterar 
los numeros de color y de tamario del grafico de 
barras. Todos estos cfetal les estan reunidos en I NIC, 
de modo que pueden tratarse todos juntos de una 
sola vez, 

Paratodas las versiones LCSI: 

Utilice TYPE por PRINT1 

Utilice EMPTYP por EMPTY? 

Tal vez necesite empiear EQUALP en lugar del signo 

de igualdad (=) 

SETXY debe ir seguida de una lista 
IF posee una sintaxis diferente; por ej.: 
IF EMPTYP USTADATOS [STOP] 



Graficos 

Tanto los graficos de barras 
como los graficos de tarta 
constituyen unas formas muy 
utiles para vis ualizar 
information, si bien eJ LOGO 
no es idea! para estos fines 
debido asu poca veloeidad 



EN TRAD A DE DATOS 



Nueva 



Londres 


York 


ENE 


53 


94 


FEB 


40 


97 


MAR 


37 


91 


ABR 


38 


31 


MAY 


46 


81 


JUN 


46 


84 


JUL 


56 


107 


AGO 


5? 


10? 


SEP 


58 


86 


OCT 


57 


8? 


NOV 


64 


76 


DIC 


48 


91 


Datos de 
precipitaciones 
(en milimetros) 



GRAFICO DE BARRAS; Londres 



GRAFICO DE 
TARTA: Londres 



64 



E F M A 



M J J A S 0 N D 



GRAFICO DE BARRAS: Nueva York 



109 



EFMAMJJASO 
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two 



.560^ 



2560^ 



Stt^ 10 



90 



1- 



END 
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Bricolaje/Construccion 




El circuito 



07 
06 
05 
04 
03 
D2 
D1 
DO 



Cuatro 
sensores 

Ahora montaremos fos 
sensores en el robot y 
escribiremos un programa 



El control bidirectional de los motores paso a paso 
exige cuatro de las ocho lmeas de datos de la puerta 
para el usuario de que disponemos. Ello nos deja 
cuatro lmeas que se pueden utilizar para llevar in- 
form acion desde los sensores hasta el ordenador. 
Para conferirle mas flexibilidad de operation a 
nuestro robot aplicaremos un "sistema de parches" 
para permitir la conexion de diferentes permutacio- 
nes de los sensores a las cuatro lmeas de entrada 
disponibles. De m omen to, conectaremos cuatro 
sensores de microinterruptor y luego instalaremos 
dos sensores luminosos. Para seleccionar cualquier 
combination de estos sensores (p. ej., dos sensores 
de microinterruptor y dos sensores luminosos), ca- 
blearemos cada sensor a un conector en la tapa del 
robot. Asimismo, se conectaran cuatro conectores 
a las Uneas de datos (de D4 a D7) del enchufe D. 
Por consiguiente, podemos conectar el sensor apro- 
piado para cualquiera de las cuatro lmeas de datos 
mediante el empleo de un trozo de cable que se 
enchufe por un extremo en el conector del sensor y, 
por el otro, en uno de los conectores de las lmeas 
de datos, 

Para comprobar la construction y el cableado de 
los cuatro microinterruptores podemos escribir un 
programa muy simple que explore los cuatro bits 
superiores del registro de datos y visualice los valo- 
res decimales de los bits enviados a 0. Ejecute el 
programa con los cuatro sensores conectados, via el 
sistema de conectores con parches, a las line as de 
datos de D4 a D7> El cierre de cualquiera de los 
microinterruptores provocara un cambio en la vi- 
sual izaci6n en pantalla. 



C0MECT0RES 
DE PARCHE 

O 



MI'CROINTERR U P~ 0 RES 





COWTR0L 
OEL MOTOR 











o 



G 



CONECTORES 
DE PARCHE 
DE LOS 
MICROINTERRUPTORES 



INSTALACI0N 



El tipo de microinterruptores que se menciona en la 
lista de componentes se puede adquirir en la mayor ia 
de tiendas de componentes. En primer lugar, efecttie 
los cortes necesarios en la tapa de la carcasa del 
robot. Las ocho ranuras se deben co ttar de modo 
que apenas quepan a traves de ellas los conectores 
de abajo de cada microinterruptor Los 10 agujeros 
de 5 mm de diametro son para los conectores de 
parche, los cuales se pueden instalar en esta etapa, 
montando los cuajro conectores rojos en Ifnea lo 
mas cerca posible del enchufe D> Para este proyecto 
los microinterruptores se ban de adaptar 
ligeramente. La palanca larga del microinterruptor 
debe inclinarse cuidadosamente, utilizando un par de 
pinzas, de modo que se forme un angulo recto. Debe 
tenerse cuidado en asegurar que la inclination no 
quede demasiado cerca de fa caja del 
microinterruptor, porque en ese caso la palanca no 
cerrara el microinterruptor una vez que este este 
montado en la tapa. De la parte trasera de este 
sobresalen dos conectores. De estos, el de arriba es 
el conector NC ("normalmente cerrado"). Dado que 
en nuestro proyecto no lo varnos a utilizar, quiza sea 
mejor quitarlo, ya sea quebrandolo o cortandolo con 
una pequerla sierra para metales. El conector de 
abajo, e! M0 (" normal mente abierto") si se utilizay 
se lo debe inclinar en angulo recto junto a la carcasa 
del interrupter. Ello asegurara que pase t junto con el 
COM ("conector comun"), a traves de las ranuras 
cortadas a tal fin en la tapa de la carcasa del robot. 
Una vez efectuadas estas modificaciones en cada uno 
de los cuatro microinterruptores, estos ya se pueden 
montar, taJ como se indica, en cada esquina de la 
tapa. Los interruptores deben montarse de modo que 
las palancas activadoras se cuelguen sobre la parte 
delantera y trasera de la carcasa del robot, y deben 
ser encolados en su sitio utilizando un adhesivo 
adecuado ( sl supercola ! ' o Cyanoacryfate) 



10 REV PRUE8A SENSORES BBC 
20 MODE 7:0P=-1:RDD=aFE62:REGDAT=&F£60:?fiDD=15 
50 P£=240-(?REGDAT AND 240): IF PE-OP THEM 30 
40 Cl_S:PRlNT PE:0P=PE:G0TO 30 

10 REM "•' PRLE6A SENSORES CBM """ 
20 0P--1:RDD= 56579: REGDAT = 56577: POKE RDD,15 
30 Pf = 240 - (PEEK(REGOAT)AND 24Q):IF PE=0P THEN 30 
40 PRINT CHRJff 47): PRINT PE;0P=PE:G0T0 30 



El circuito 



El circuito que conecta los sensores de 
microinterruptor con ei sistema del robot es muy 
sencillo. Las lmeas de datos de D4 a D7 estin 
conectadas a los 4 conectores montados en la tapa 
del robot; las lmeas de datos de DO a D3 se utilizan 
para et control del motor. Uno de los lados de cada 
microinterruptor esta conectado a un grupo similar 
de 4 conectores; el otro lado va conectado a una 
tierra comun. De requerirse los 4 interruptores, se 
los puede parchear en las lmeas de datos mediante 4 
cables de parche, Si los 4 bits superiores del registro 
de datos de la puerta para el usuario se establecen en 
entrada, entonces se suelen mantener altos (en 1). El 
cierre de cualquier microinterruptor parcheado en el ' 
sistema conectara a tierra la linea de datos, poniendo 
bajo (en 0) el bit correspondent© 
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Jonstruccion de un robot Br icolaje 



Agujeros de la tapa 



ENCHUFE D 



VISTOS DESDE ARRIBA 



0 Q 



1 cm 



2 cm 



35 mm 



15mm 15mm 15 mm 



HO D 



^ 



8 mm 



15 mm 



0 D 



AGUJEROS 
'DE LOS 
CONECTORES 
DE PAR CHE 



AGUJEROS DE 5 mm 
DE DIAMETRO 



INTER. < 


PALANCA DEL MICR03NT. EN ANG. RECTO 


— 




H f'/ilCRGlMERRUPTOR 


ACTIVADOR 




PIT, 










lyHMB^ CONECTOR -no " 

■i™ ENANGULO 


COM- 






RECTO 




L 






Montaje 










VtSTA LATERAL 







Lista de componentes 



Cantidad 

8 
4 

6 

VARIOS 

4 

1 m 



Articulo 

enchyfe 2 mm 
conectorrojo2mm 
conectorazul 2 mm 



microinterruptor 
cable piano de 4 vias 



inferior 

NO 



CONECTORES 
DE PARCHE 



NO COM 



i - 



conector NO ai conectar sni 
adecuado. Construya 4 cables 
de parche para uiilizar con el 
sistema 





CONEXIONES 
DE LOS 

MICROINTS.QUE 
S08RESALEN 
DE LA TAPA 



[ CONECTORES 
ENCHUFE D OE PARCHE NO 
DE LOS MICROINTS, 
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Mapa de memoria 
del BBC 

El presente capftulo esta dedicado al empleo que el OS del BBC 
Micro hace de la memoria 



El BBC Micro utiliza varias areas de la memoria, 
muchas de ellas con varias funciones. Un ejemplo 
tipico es la pagina &9 de la memoria (o sea, el area 
de la RAM que va de la position &900 a la &9FF). 
Esta sirve, segun las veces, como buffer de salida 
del RS232, buffer de salida de la cassette, zona de 
trabajo para la voz y de zona de trabajo para el 
sonido ampliado. jNadie puede acusar a Acorn de 
despilfarro de memoria! 

Otro ejemplo es el bloque que va desde &0E00 a 
&1900. Esta area, cuando se emplea la cassette 
como sistema de archivo, queda libre para ser 
usada como espacio libre para programas basic. 
Pero si lo que se emplea es el disco, sirve de zona 
de trabajo del sistema de archivos en disco, redu- 
ciendo el total de memoria reservada a los progra- 
mas basic en mas de 2,5 K. Lo cual es una dificul- 
tad con los Modos del 0 al 2, pues ya queda previa- 
mcnte reducida la memoria. 

Un ultimo ejemplo del multiuso de la memoria 
esta en el area entre &8000 y &BFFF. Si se acopla 
una ROM DFS, un procesador de textos o una 
ROM de utilidades en la maquina, la zona que ocu- 
para sera esta. Pero tambien es aqui donde reside la 
ROM del interprete de basic. Estas se Ilaman 
ROM paginadas y solo una de ellas puede estar ac- 
tiva a la vez. La ROM requerida es selection ad a 
por el sistema operative, quien la "conecta" o "pa- 
ginal Normalmente la ROM del basic ya esta pa- 
ginada y el interprete funcionando, lo que nos per- 
mite escribir y ejecutar programas en basic. Pero 
cuando se ejecuta la instruction DFS, el sistema 
operative pagina la ROM del DFS, ejecuta la ins- 
truction y vuelve a paginar la ROM del basic. Esta 
ultima sencillamente se ignora durante la ejecucion 
de la orden DFS, Otras ROM tales como las del 
TFS (Telesoftware Filing System), tambien para ar- 
chivos, o del chip procesador de textos Word wise, 
tambien ocupan el mismo espacio de memoria y 
son paginadas por el OS segun se las requiera. Pro- 
bablemente debido a que el BBC Micro emplea la 
misma area de memoria para multiples fines, queda 
algo mas da memoria para el usuario* 

Memoria del usuario 

Una vez que el OS ha tornado posesion de su par- 
cela de memoria, el res to es la memoria dispo ruble 
para el usuario. La variable basic llamada PAGE 
(p-apna) contiene la direction de inicio del area 
para programas basic, y la variable HI MEM (high 
memory : parte alta) seiiala el inicio de la memoria 
para visualization en pantalla; el espacio interme- 
dio es el que queda para los programas basic, las 
variables y los programas en c6digo maquina. Digi- 



te esta instruction para conocer diehas direcciones 
y la memoria disponible para los programas basic: 

PR I NFPAG ErH I M EM" f H ( M EM-PAGE) "BYTES LIBRES" 

En la tabla siguiente se proportiona una breve des- 
cription de los distintos usos de las diversas areas 
de almacenamiento para codigo maquina. 



Que areas estarr disponibles 
para programas en codigo maquina 


Tipo de sist 
de arcrrivo 


Casset. 


Disco 


&QD00 - &0DFF 

Pagina &D: soto cuando no existen 
ROM paginadas en la maquina 


(✓) 


X 


&QBQQ - &0CFF 

Pgs, SB y &C: cuando no se emplean 
en el programa caracteres definidos 
por el usuario o teclas de funcidn del 




(V) 


usuario 






&DA00 - &0AFF 

Pagina &A; cuando no se esta 

empleando una interface en serie 




M 


Espacio guardado en eJ area para 
programas basic por la instruction DIM 






Si (y) = Sf, con reservas X Noempleado 



El almacenamiento del codigo maquina en el area 
para programas basic es la mejor solution para mu- 
chas rutin as empieadas junto con programas basic. 

Una vez introdueido en !a memoria el codigo 
maquina, se necesita por lo general una zona de 
trabajo para poderio ejecutar. Muchos programas 
en codigo maquina para el 6502 exigen la pagina 
cero como zona de trabajo, principalmente porque 
algunas in st ruction es de direction amiento indexa- 
do necesitaran posiciones de la pagina cero. Acorn 
ha empleado largamente esta pagina para el OS, 
pero algunas posiciones se han reservado para la 
program acion en lenguaje maquina. No es de gran 
utilidad para el usuario una description byte por 
byte de lo que hace cada una de las posiciones del 
OS, y no se recomienda el acceso directo a ellas: las 
posiciones utiles deben accederse por medio de lla- 
ma das al OS, lo que significa una fuente de proble- 
mas a la hora de ejecutar un programa en codigo 
maquina escrito para una version dife rente del OS, 

Entrada al OS 

Las dos rutas principals que podemos tomar para 
el empleo de las rutinas contenidas en el OS del 
BBC son las rutinas OSBYTE y 0SW0RD: 
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• OSBYTE nos pennite modificar el comportamien- 
to de mochas rutinas del OS, pasando c6digos de 
control y parametros en los registros A, X e Y del 
6502. En basic podemos acceder a las rutinas OSBY- 
TE a traves de la instruccion *FX. A la instruccion 
"FX siguen dos o tres numeros: el primer numero es 
el control o codigo de funcion que se pasa al regis- 
tro A: el segundo es el numero que se pasa al re- 
gistro X, y el tercero el que se pasa al registro Y, El 
tercer parametro no es necesario en todas las llama- 
das de OSBYTE. En codigo maquina esta rutina es 
llamada en ia direction &FFF4. Estas dos versiones 
tienen funciones equivalentes: 



BASIC 


Assembly 


*FX4,i 


LDA #4 
LDX # 1 
JSR &FFF4 



El valor contenido en el registro A define exacta- 
mente lo que hara una llamada determinada a OS- 
BYTE La Bawtacfa Oustrada. per ejemplo. afecta a la 
acckn de ias tedas del cursor; el parametro coloca- 
do en ei registro X espearka el que las teclas reten- 
gan sn funrida etfitora normal o el que den simple- 
mente un codigo ASCII. 

Desgraciadameme no todas las rutinas OS pue- 
den ser sonietidas al OSBYTE. La mayor desventaja 
esta en que el numero de parametros que pueden 
pasarse a la rutina es limitado. Si se desconoce el 
oooienido del registro A, que es el que indica al OS 
que rutina deseamos emplear de entre las de OSBY- 
TE. solo podemos pasar dos parametros a los regis* 
1 c Y. Para pasar algo mas que est o nos servirc- 
~r,r-> Je la segunda rutina, la OSWORD, 

• La OSWORD permite cosas tales como generar 
sonidos, leer v escribir sob re disco, etc. Aqui reside 
■ iiterencia entre la OSBYTE y la OSWORD. Aquella 
se ocupa de la manera en que el OS realiza ciertas 
tareas. y esta nos permite la realization cone ret a de 
tales tareas. OSWORD obtiene sus parametros de un 
bloque de parametros al que apuntan los registros X 
e Y dd 6502 al ceder control a la rutina OSWORD, 
Esse faioqre de parametros se situa en la RAM y su 
hmd j imiii ■ rai dependen de la llamada OS- 
WORD qae se km El ressoo A con Dene un codigo 
de iumaam qne dstenavm coal de entre las funcio- 
a^deOSNDHD bdeserefecatadaporel OS Una 

jfaragfa a OSWORD se realiza en la direction &FFR . 
Los printipales instrumentos de enrxada del OS 
son. sin duda. OSBYTE y OSWORD. y por su singular 
import ancia habremos de examinarlas mas adelan- 
te con mayor detalle. 

Desde basic se puede acceder a otras rutinas del 
OS mediante un aster isco (*) seguido de una ins- 
truccion. Este sim bo I o hace que la instruccion que 
sigue evite el interprete de basic y sea pasada a una 
rutina OS de nombre OSCLI (Operating System 
Command Line Interpreter). Esta rutina se encarga 
de interpreter las ordenes OS digitadas llamando a 
las adecuadas rutinas del OS, Con frecuencia tales 
instrucciones se denominan instrucciones estrella o 
instrucciones *, El cuadro adjunto al final del capf- 
tulo da una relation de tales instrucciones reconoci- 
das por el BBC; las que no son reconocidas, sea 
porque no se escribieron correctamente o porque 
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&FFF ■ 
&FF00 
&FC00 



acooo 



40EOO 

&OD0O 
&QCQQ 



£0800 



&0900 
&Q3DD J 



ROM del OS 



MapadeE/S 



ROM del OS 



ROM del basic 



ii:r. : : :: 
i-i : : :-. i:i : 



ROM paginada 
: esc, - 



Caracteres 
def. usuaric 



Teclas def. 
usuario 



Buffers (memoriae 
transitorias) 



Espac o trabajo 



Espac io trabajo 
para basfc 



Ir.i: : : : 





Butter tecladc 



Variabiles del 
sistema cassette 



r&3FF 
!■ &37F 



Esp. irabajoVDU 



:&2FF 



Esp. Irabajo sist. 
archive y casseiie 



Espacio trabajo del 
OS y variables escntas 
por llamas FX 




' &2E9 



no se acompanaron del numero adecuado de para- 
metros, suelen prove car un mensaje de error del 
tipo Bad Command (orden impropia), 

Podemos pasar ordenes a la CLI (Command Line 
Interpreter interprete de line a de instruccion) por 
medio de la rutina OS o bien d i recta mente. Los 
servicios de la OSCLI son dobles: primero, permite 
que pasemos las instrucciones del citado cuadro a la 
CLI via codigo maquina si asi lo deseamos, y, segun- 
do, nos permite pasar variables alfanumericas en 
basic a la CLL Los siguientes prog ram as ilustran 
am bos usos, Observese que las variables numericas 
enteras, A%, X% e Y% pasan sus valores directa- 
mente a los registros A, X e Y. De el las, X% e Y% (b, 
lo que es lo mismo, los registros X e Y) apuntan a la 
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position de memoria de la cadena de caracteres 
que se ha de tratar como una instruccion asterisco, 
y debe ser interprctada y ejecutada por la rutina 
OSGLI. Mientras X retiene el byte lo (inferior) de la 
direccion e Y retiene el hi o superior. 



Version basic 


Version HasiD+ Assembly 


10 DIM C 100 


10 DIM C 100 


20 0SCLI=&FFF7 


20 0SCLJ=&FFF7 


30 INPUFENTRAR 


30 FOR l%=0T0 2 STEP 2 


1NSTRUCCI0N H ,AS 


40 P%=&C0O 


^0 IC=A£ 


50 I OPT 1% 


50 X%=CM0D256 


60 ,cod« LDX #C MOD 256 


60 Y%=C D!V 256 


70 LDY #C DIV 256 


70 CALL OSCLl 


80 JSR OSCLl 


80 GOTO 30 


90 RTS 




100 ]:NEXT 1% 




110 INPUT "FjNTRAR INSTRUCCION \ AS 




120 SC=AS 




130 CALL code 




140 GOTO 110 



La ejecuci6n de este programa produce un aviso: e 
usuario digita una instruccion * , pulsa la tecla Re- 
turn y la instruccion se ejecuta. La sentencia, mas 
bien extrana, de la Imea 10' de ambas versiones, 
DIM C 100, hace que el ordenador reserve 100 bytes 
de memoria, en el espatio reservado para las varia- 
bles basic e micializa la variable C con la direction 
del inicio del bloque de memoria. Estos 100 bytes 
puede n ahora empJearse para almacenar progra- 
mas en codigo maquina o, en un caso como este, 
los datos de los programas en codigo maquina. La 
sentencia 3C=AS coloca los bytes que camponen la 
cadena de la instruccion contenida en AS dentro de 
ese bloque de 100 bytes , comenzando por el primer 
byte reservado por LI I M. En ambas versiones los re- 
gistros X e Y (o sea, las variables X% e Y%) son 
activados realizandose asi la llamada a la OSCLl . La 
cadena de la instruccion se ejecuta seguidamente, 

Este programa es la base de una rutina que se 
em plea en programas action ados por menu, donde 
puede resultar util permitir al usuario obtener un 
catalogo de discos o tint as. por ejemplo. sin tener 
que abandonar el programa. La instruction reque- 
rida se coloca sencillamente en las variables alfanu- 
mericas y se pasa a la OSCLl para ser ejecutada. Si 
digi tamos "AS no funcionara. El OS intentara eje- 
cutar una instruccion llamada "AS que no existe. 

Por medio de esta tecnica es tambien factible 
pasar variables numericas a una instruccion * me- 
dian te la funcion STR$ para convertirlas en alfanu- 
mericas. Normalmente la CLI no aceptara ningun 
nombre de variable que se le page; produce el men- 
saje de error Bad Command, 

Toda instruccion * que no es reconocida por el 
OS es pasada a cualquier ROM que este paginada. 
A cad a una se le pregunta si la reconoce; si es asi, la 
ejecuta. Las instrucciones que no se pasan de esta 
man era para ser ejecutadas son t rat ad as como or- 



OS 



- &FF 

m 



EC0NET 



no uti^izAao; ■ 



BASIC 



W.'.'A'.'AV, ' . 1 /.'^.'.-.-.'-'.'.-.-.'. 1 



&9F 



&70 



:oo 



Uso de la p^gina Gemenel 
BBC Micro 

Las limitadas tacilidades de 
indexacton del 6502 se 
coTnplementan con su uso de 
la pagina cero (&0000 hasta 
&00FF) como una matriz de 
registros indices auxiliares. 
Esto conduce natural me nte a 
una densa uttlizacion de estas 
posiciones por el 0S f pero 
existen unos pocos bytes que 
no se emplean y se dejan para 
uso del prog ra mad or 



denes incorrectas sdlo si no se emplea un sistema 
rapido de archivo, como, por ejemplo, la unidad de 
disco. Si se emplea, el disco sera inspeccionado 
para ver si contiene un archivo con el mismo nom- 
bre que el de la instruccion (excluido el *). Si lo 
contiene, el archivo se carga en la maquina y es 
tratado como un programa en codigo maquina. 
Esto puede ocasionar numerosos problemas en 
caso de que tal archivo no sea en realidad un pro- 
grama. El ordenador suele "insistir" en estas situa- 
ciones hasta que usted no liega a sacarlo de su atas- 
co + Si tal archivo no existe, entonces visualiza un 
mensaje de error Bad Command. 

Las instrucciones* 



instruccion 


Descripcibn y camentarios 




Da el numero de la version del basic, 
Puede tambien servir para obtener 

infn rnnarinri enhro ntrsc ROM 
II llUf II laUUt 1 dUUI c Utlao nuivi 

paginadas que se han incorporado; 
asi/HELP DFS 


'BASIC 


Da entrada al lenguaje basic. Una 

ejemplo s *WQRD S que da entrada a la 
ROM paginada View, en este caso 


"LINE 


OAJn on vprcinn 1 9 Hp] HQ PprmitA 
ouiu ci J vci biui i i x.Uvi uo, rci nine 

anadirnuevas drdenes 


'KEY 


Para programar teclas funcion rojas 


'MOTOR n 


Para controlar el rele del motor de la 
cassette: n=0 desconecta el rele y 
n=1 lo conecta 


"ROM. 'TAPE, 
'DISK. 'NET 


Para iniciallzar el adecuado sist. de 
archivo: *TAPE dara entrada al sist, 
de archivo en cass. de 1 200 
baudios, y *DISKal de archivo en 
disco 


"FX 


Permite que el programador controle 
fos valores de varias variables del OS 
y s gracias a eso, el comportamiento 
del OS 


'RUN, "OPT 
"LOAD, \ 
'CAT, 'SAVE 


Instrucciones del sistema de archivo 
que examinaremos mas tarde en otro 
capitulo 


"SPOOL 
'EXEC 


*SP00L envia la salida de pantalla a 
la pantalla y a un archivo, *EXEC lee 
datos de un archivo como si se 
leyeran del teclado 


'TV x,y 


Afecta a la posicion vertical de la 
pantalla y la interface de pantalla: 
x=0 no produce cam bios en la 
posicion vertical; x=1 mueve la 
pantalla hacia abajo una Imea; x=255 
la mueve hacia arriba una Imea; y=0 
activa ei "interlace"; y=1 lo 
desactiva, Sus efectos se hacen 
operativos en el sig. cambio de modo 
y no cesan hasta que no se o prima 
CTRL-BREAK u otra instr *TV 


Una mas detallada explication de estas instrucciones ! 
las obtendra el lector en la misma guia del usuario 
del BBC Micro 
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Un cambio 
continental 



GRAM BRETANA 
510 



2^ 



ESCANDINAVOS 
180 




En esta ocasion artalizaremos los pros y los contras que implica la 
traduccion de programas del ingles a otras lenguas 



L 



Hasta hace poco tiempo casi todos los programas 
de software estaban escritos en ingles. El ingles era 
el idiom a estandar de la inform atica debido al pre- 
domiiiio de Estados Unidos en este campo durante 
la decada de Ids dncuenra y los sesenta. 

Sin embargo, la introduccion del microordena- 
dor, a finales de los anos setenta y principios de los 
ochenta, provoco grandes problemas en los paises 
de habla no inglesa. Ello represento un gran obsta- 
culo para ia difusion de la micro informatica a t raves 
de la Europa continental y creo un circulo vicioso. 
Las empresas no invertfan en software que no com- 
prendian ni podian utilizar con faeilidad, y las fir- 
mas de software no gastaban el dinero necesario 
para traducir sus programas al idioma del pais 
cuando las ventas prevlsibles no eran suficientes 
para cubrir los costos de desarrollo. El resultado 
fue que Gran B re tana, disfrutando de la enorme 
ventaja de compartir un idioma comun con Est ados 
Unidos, se convirti6 en el mercado mas desarro I la- 
do de to da Europa para los microordena do res . 

En la actu alidad la situation esta empezando a 
cambiar. Las firmas de software han eomprendido 
el enorme mercado potential de Europa continen- 



tal y han empezado a traducir sus programas a los 
idiomas de los paises en los cuales esperan vender 
sus productos. Lotus Software, como una de las 
mayores proveedoras de programas de gestidn para 
IBM, fue una de las primeras empresas que pro- 
dujo traducciones a otras lenguas. 

El Loots 1-2-3 y el Symphony figuran entre los 
paquetes mas vendidos de la nueva generation de 
''software integrado". Estos paquetes por lo gene- 
ral incorporan una hoja electronica, base de datos y 
algunas capacidades para graficos y tratamiento de 
textos* Los datos se pueden pasar entre cada una 
de estas aplicationes, permitiendo, por ejemplo, al- 
macenar information en una base de datos para 
tratarla en una hoja electronica y poder luego in- 
corporarla a un documento. 

La traduccion de uno de tales programas del in- 
gles a, por ejemplo, el italiano, podria parecer rela- 
tivamente sencilla: todas las instrucciones que apa- 
rezcan en la pantalla se han de traducir al idioma 
apropiado, Sin embargo, de inmediato surge n di- 
ver sas dificultades. En primer lugar, si el texto esta 
incorporado en el propio codigo fuente, encontrar 
el texto en 120 K de c6digo en el que tanto el texto 



Ordenadores persons =s 
en Europa 

Debido a que Gran Bretana 
partib con la ventaja de 
compartir una lengua coreui 
con Estados Unidos, tii e 
momenta las empresas 
britanicas han superado 
ampliamente a las de Euroca 
continental desde el purcode 
vista de la instaiacirr := 
ordenadores personaiss. Pe3 ■■ 
ser, sin embargo, c.= ~- z i: 
crecimientc de las ve-tas t~ 
Gfan Bretana esta tr~ = 
justo cuando se product ei 
despegue del mercado ss cs 
otros paises euro pecs 
calcufa que para 1 955 * 
Republics Federal de ker^c. 
ha bra superado a Brar: Ststs. 
en la cantidad io:a n -r. 
instalad as 




156 or 
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ASCII international 

Para tratar con los juegos de 
caracteres especificos que 
emplean Jos distintos idfcmas, 
Lotus ha desarrollado el UCS 
(Lotus International Character 
Set: juego international de 
caracteres Lotus), en el cual hay 
un codigo para cada caracter no 
perteneciente al idioma ingles. 
En un teclado trances, por 
ejemplo, la pufsacion de la letra 
$ (como en cafe) generaria un 
codigo 156; este corresponds a 
173 en UCS. Cuando este 
caracter se ha de enviar a la 
pantalla, el LICSA lo vuelvea 
decodificara 156; la impresora 
podria comprender el codigo 
1 56, o bien necesitar que se le 
enviara una secuencia de control 
tal como <e>, <ESC>, 
<BSPACE>, <>. El texto se 
puede guardar en cddigos ASCII 
ingleses, en LICS o en cddigos 
ASCII deotro pais 



como el programs eslan representados por niime- 
ros const it uye una tare a muy complicada* En se- 
gundo lugar, si el texto tradncido es mas extenso 
que el texto original en ingles (lo que sucede casi 
si em pre) el prog ram a necesitara mas bytes para al- 
macenarlo. Esto alterara las direcciones de todo el 
codigo subsiguiente, convirtiendo, por lo tamo, en 
un sin sentido los bucles y las llamadas a subrutinas. 

Otro problema es la sintaxis. Cuando un usuario 
ingles desea operar sobre un archivo. la sintaxis es 
COMMAND (instruction) seguido de FILENAME 
(nombre del archivo), Sin embargo, este enfoque 
no es el normal en otros idiomas. En aleman. por 
ejemplo, lo logico es entrar primero el nombre del 
archivo. seguido por la instruccion. Se plantea un 
problema similar en la forma de entrar las fechas. 
lo que ha sido fuente de problemas incluso en Gran 
Bret ana. Tanto el 1-2-3 como el Symphony permi- 
ten el ernpleo de fechas en formulas para calcular 
cambios en los valores a traves del tiempo. En Es- 
tados Unidos, el metodo normal para entrar los 
datos es mes/dia/ano. Sin embargo, en Gran Breta- 
na y en muchas otras partes de Europa cl formato 
estandar para fechas es dia/mes/ano. A mcnos que 
el paquete de software se pueda manipular de 
modo que tenga en cuenta las diferencias en cuanto 
a la forma de entrar instrucciones y datos, el resul- 
tado sera, en el mcjor de los casos, confuso o, en el 
peor, un sin sentido total. 

Los editores de software deben asimismo tener 
en cuenta los diferentcs juegos de caracteres. El al- 
fabeto f ranees incluye letras tales como e y d, mien- 
tras que el aleman y las lenguas escandinavas in- 
cluyen la letra a. Para complicar aun mas las cos as. 
los dife rentes alfabetos colocan estas letras en otro 
orden, haeiendo estragos en cualquier rutina inea- 
paz de resolver estas diferencias. 

Diseno de programa 

Al traducir el Symphony a las principles lenguas 
europeas, Lotus decidio que la unica forma razona- 
ble de abordar el problema era disenar el programa 
de modo que permitiera una facil traduction* Este 
enfoque no se adopto con el paquete 1-2-3 anterior 
y, a eonsecuencia de ello, la empresa tuvo grandes 
dificultades para traducirlo. No obstante, el Sym- 
phony se ha traducido con total exito al frances, al 
aleman y a las lenguas escandinavas y la empresa 
esta trabajando ahora en una version italiana. 

Para superar los problemas de local izaci on del 
texto en el codigo y tratar de comprimir las nuevas 
pa la bras en el espaeio disponible, Lotus ha adopta- 
do una construction modular del programa. Den- 
tro de este hay dos divisiones: el codigo fuente que 
contiene las rutinas del programa y un segmento de 
datos que incluye el area de textos, Este sistema de 
aislar el texto del codigo fuente se conoce como lo- 
calization. La organization del programa de acuer- 
do a este formato resuelve dos de las dificultades 
principales, Primero, el hecho de tener el texto en 
un segmento separado significa que se puede reser- 
var espaeio extra para cualquier diferencia en cuan- 
to a extension del texto, y este puede ser extraido 
del programa con mucha mas facilidad. Una utili- 
dad extrae del ccSdigo las areas de texto; estas se 
pueden entonces traducir y volver a incluir en el 
segmento de datos, Como ventaja adicional, el 
texto se puede reacomodar dentro de la seccidn de 



datos para dar cabida a las diferencias de sintaxis 
que requiera cada idioma. 

Al traducir ei texto propiamente dicho hay que 
considerar tod a via otro pun to. El Symphony per- 
mite entrar las instrucciones siinplemente pulsando 
el primer caracter del nombre de la instruccion , Por 
lo tanto, cada instruccion debe empezar con una 
letra diferente. Ademas, las limitationes de espaeio 
significan que en un paquete en el cual la traduc- 
tion literal sea demastado larga, quiza sea necesa- 
rio hacer alguna concesi6n. 

Tambien pueden surgir problemas cuando se tra- 
duce entre juegos nacionales de caracteres. Ya 
nemos visto que los di versos paises poseen letras 
diferentes en sus alfabetos, Lo que agrava el pro- 
blems es que para los codigos no existe ninguna 
estandarizacion acordada con caracter internacio- 
nal. En los dias de la cinta de papel, cuando eran 
comunes los codigos de siete bits, el estandar 
ASCII se utilizaba en todo ei mundo casi sin ningu- 
na exception. Con el advenimiento del microorde- 
nador y de los codigos de ocho bits, la estandariza- 
cion desapareeio debido a que cada fabricante pro- 
dujo su propia version del "estandar" ASCII. 

Esta practiea la han adoptado distintos paises, Al 
adaptar el teclado del ordenador a su propio juego 
de caracteres, muchas naciones han sustituido algu- 
nos caracteres ingleses por sus propias letras. Por 
consiguiente, la comunicacion entre ordenadores 
configurados para idiornas diferentes se esta convir- 
tiendo en un enorme problema. El codigo ASCII 
en aleman podria significar algo totalmente diferen- 
te en castellano. 

Esta confusion la agravaron aun mas los traduc- 
torcs del Symphony, ya que muchas dc las instruc- 
ciones de una unica pulsation de tecla utilizadas en 
el programa eran caracteres tales como @, que no 
existe ~en los teclados no ingleses. La solucion que 
encontro para este problema la propia IBM en su 
PC es mantener pulsada la tecla ALT y digitar el 
codigo ASCII decimal en el teclado numerico, 
;anulando + de este modo. la ventaja que reportaba 
el tener instrucciones para las cuales solo se habia 
de puisar una tecla 1 

Lotus decidio que la unica forma de abordar este 
problema era desarrollar su propio juego de codi- 
gos, que se denomina LICS (Lotus International 
Character Set: juego internacional de caracteres 
Lotus). Este juego, de 250 caracteres, contiene 
todas las letras utilizadas en la mayoria de las len- 
guas europeas y esta almacenado en todas las co- 
pias del Symphony. La traduccion supone configu- 
rar ei programa de modo que el codigo que reciba 
un teclado de lengua no inglesa se traduzca a LICS, 
y el programa pueda, en eonsecuencia, compren- 
derlo. Para simplificar el proceso de imprimir ca- 
racteres que no aparezcan en el teclado, Lotus ha 
conscguidor reducir estos caracteres a una unica 
pulsacion de la tecla ALT y un numero entre 0 y 9. 

£1 proceso de traduccion de un paquete de ges- 
tion es una operacidn costosa y que consume 
mueho tiempo. La traduccion lleva un promcdio de 
nueve meses y es extraordinariamente cara. No 
obstante, las firmas de software ya no pueden per- 
mitirse el lujo de ignorar un mercado de 300 millo- 
nes de personas como es el de Europa continental. 
A pesar de la inversion que requierc la traduccion 
de un paquete de software, los beneficios que esta 
reporta bien valen el esfuerzo. 
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Desde el Mas Alia 



Nos corresponds abordar el 
resto de ta rutina del tunel y 
disenar una subrutina para que 
a parezcan fantasmas al azar en 
el "bosque encantado" de 
nuestro juego 

Em dl capfcido antenor analizamos los escenarios 
rTprrvir r qeeposeeo una eniradaaJ tunel: en estos 
esoeaado^se le ofrece al jugador la oportunidad de 
penerrar en el mad 0 de reroceder hasta el sende- 
ro que lo ooodujo a la entrada Si el jugador elige 
entrar en el tuneL entonces se llama a una nueva 
subrutina. en la Ifnea 4655. Veamos ahora la subnt- 
tina que maneja la option en la cual el jugador pe- 

er ^ : Kind. Esta subruiina e>:a L->jr:::. 
mertio a ciertas reglas que establecio el disenador 
_ ._ En primer lugar, el jugador solo puede 
atravesar e! tunel si lleva consigo el farol; ademas, 
debe encender el farol para alumbrar su camino. 

Dado que el jugador ha de poder impartir ins- 
micciones mientras permanezca en el interior del 
ninel. la subrutina debe empezar con una secucncia 
. . : icepte la entrada de una instruction y la des- 
componga para su proceso. Podemos perm it ir que 
el jueador u til ice algunas de las insti uceiones de en- 
trada normales. conio RECOGER, DEJAR, LISTA o 
AN, pero en este pun to hemos de tener cuidado. 
Poroiaiito concieme al puntero del escenario, P, el 
jnjjirtnr se haila todavia en la boca del tunel y, por 
b tammxK esta en prodkaones de AVANZAR en ciertas 
mmwammcs pe-~-^ PfM'coosigjBente. mientras 
» enmw dcacro del tune!, debemos supri- 

M Mm mm de h\ ±m btm rm* ' a^tiaui eoes nor- 

ZW se 1 MiHm 11 Ik ~be?>iera de ff^mmmstMboT 
(MF) y el valor de F - ^ r_ ^Tibaioi Esse efecto se 
puede anular simplemente restaurando a P el valor 
Tenia antes de que >e llamara a la subnitina 

r. >; race ion es norniales". 

Habiendo manipulado satisfactoriamente las ins- 
fapociones norm ales, podemos pasar a considerar 
l&s instrucciones espeeializadas neces arias para est a 
situation en particular, Se puede permilir que el 
jugador utilice una instruccion RETROCEDER para 
• _ hasta la entrada al tunel que traspasd a) 
=mraj- La unica otra instruccion que permit] re mos 

i IENDER, o una variation, USAR + Si la instruc- 
cion impartida no es ninguna de estas, la rutina pro- 
dutira un mensaje general NO CQMPRENDO antes de 
desandar el bucle en espera de otra instruccion. 

Si la instruccion es ENCENDER o USAR, entonces 
tendremos que efectuar varias comprobaciones 
antes de obedeeer la instruccion: 



L, ^Es el objeto especificado un objeto valido? 

2. ^Lleva consigo el jugador el objeto especifi- 
cado? 

3. <,Es el farol el objeto especificado? 

Si la respuesta a todas estas preguntas es u sf\ al 
jugador se le permitira atravesar el tunel hasta el 
otro extreme*, puesto que se han satisfecho las con- 
diciones para atravesarlo. Estas comprobaciones 
del objeto ya nos re sultan familiares. De hecho, 
son casi identicas a las empleadas en las rut in as RE- 
COGER y DEJAR. Por lo tan to, para llevar a cabo 
estas verificaciones podemos utilizar rutinas escri- 
tas anteriormente. 



4700 REM "ENTRARAL TUNEL ~ 

4705 SJiS=-EMTRAS EN aTUNEL PERO ESTA DEMA5IAD0 0SCUR0 

::v: 

4710 SI*S=SI6^-fWWBCO*fTRARELCAMtNO":GOaJB5500 

- :: == " -." \e=_:: :\E5 

4730 GOSUB250CH3EM DESCOMPONER INSTRUCCION 

4733 IF F=GTHEN 4725 REM INSTRUCCION NO VALIDA 
4740 0P=P:G0SUB3D0C:REM INSTRUCCIONES NOR MALES 
4745 IFMF-1 THEN SNS = "ESTA TAN 0SCUR0 QUE SOLO PUEDES 
VER":P=0P 

4747 IFMF=1THEN$N$=SN$+" LA ENTRADA DEL 

TUNEL" :GQSUB5500:MF=0:GOTO 4725 
4750 IF VF=1 THEN 4725:REM INSTRUCCION 0BEDECIDA 
4755 IF VBS=- RETROCEDER " AND P-4 THEN MF 1:P 6: 

RETURN 

4760 IF VB$= " RETROCEDER " AND P- 1 THEN MF-1 :P=S: 
RETURN 

4762 IFVBSo"USAR" AND VBSo "ENCENDER'THEN SN$="N0 
COMPREND0 1 ' 

4765 IFVBSo^USAR" AND VBSo "ENCENDER"THEN 

G0SUB5500:G0TO4725 
4777 : 

4780 REM " BUSCAR FAROL ** 
4790 G0SUB5300:REM OBJETO VALIDO? 
^795 OV=RGOSUB5450:REM LLEVA EL OBJETO? 
4797 IFF=0THEN SNS=' l N0 HAY N I NG U N "> WS : GOSUB5500 : 
GOT04725 

<a« FHF=€ THEN SNS= "TU NO TIENES EL " + IVS(F. 1 ):GOSUB5500: 

~: z . 

4tt5 £Fo2T*€*Sie='LA " -iVSF : \G 
E = E E I E . E : : " I z.~.- l 

-V-. S\S= r - z 1_ - __'/ V™ E_ Z.-V M 

e:e_E:::: 
4b50 if p^t then mf=1 :p=4:return 
4855 if p=4 then mf=1:p = 1:return 



Fenomenos sobrenaturales 

Ad em as de tener escenarios cspecialcs, como las 
entradas al tunel, podemos program a r peligros o 
acontecimientos a I azar. Llegados a este pun to. en 
el desarrollo dc nuestro juego El bosque encamado 
no hemos mencionado fantasmas, ni los mismos 
aparecen en el ma pa del mundo de aventuras para 
el juego. Hn cam bio, los fantasmas se le aparecen 
al azar al jugador a medida que va recorriendo el 
bosque y solo se los puede mantener a ray a em- 
prendiendo una accidn extra vagante* Antes de ana- 
lizar detalladamente la rutina "de los fantasmas", 
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consitie renins como podemos incorporar cn la es- 
tructura del programa principal las rutinas para ge- 
ncrar apariciones aleatorias. El bucle principal del 
programa llama a una subrutina de la Ifnea 2700 
para constatar si an nuevo escenario es especial en 
algun sentido o no. Este es tambien el mejor lugar 
para incorporar el siguiente trozo de cckligo, que 
ticnc como finalidad decidir si el programa debe 
general fan t asm as al azar: 

2707 REM *-* FANTASMA AL AZAR ** 

2710 IF P >4 AND RND{1}<0.1 THEN GOSUB 429G:RETURN 

La linea 2710 asegura, en primer lugar, que el esce- 
nario actual no haya sido ya designado como espe- 
cial, dado que si los fanlasmas aparecieran en la 
mitad de rutinas especiales ban an que la vida resul- 
tara muy complicada. Si el escenario es comun. uti- 
lizando la instruccion RND existe una posibilidad 
entre 10 de que el programa produzca un fantasma. 
Las instrucciones RND generan numeros seudoaka- 
lorios, asi llamados porque el patron de numeros 
generados desde la conexion a la red del ordenador 
es predecible. Para hacer que la secuencia sea 
menos predecible, utilrzamos la instruction RND 
con un opera n do negativo en el caso del BBC 
Micro y del Commodore 64, y la instruccion RAN- 
DOMISE para el Spectrum (vease u Complementos al 
basic" cn la pagina contigua). 

207 R=RND(-t) 

Si se llama a la rutina de los fantasmas, entonces 
entramosi en otro escenario especial en el cual el 
jugador se enfrenta a la aparicion fantasmaL La ru~ 
tina sigue el procedimiento usual:! genera un men- 
saje initial, solicits una instruccitin y la descompo- 
ne en el verbo y el resto de la frase. Las instruccio- 
nes normales son tratadas por la subrutina estan- 
dar; pero nuevamente se suprirne la instruccion 
AVANZAR: un mensaje informa al jugador que. al 
hstberse quedado parauzado por el terror, no se 
puede mover. 

Red de seguridad 

En esta etapa se pueden rratar nuevas instruccio- 
nes. Al igual que las otras rutinas_de tratamiento de 

escenarios especiales, la calidad del juego term i n a- 
do depende de cffaTTto esfuerzo de programacion sc 
dedique al diseno de estas rutinas. Cualquier ins- 
truccion que no sea directamcnte util en la rutina se 
puede tratar mediante la red de seguridad NO COM- 
PRENDCK No obstante, con un esfuerzo de progra- 
macion adicionab podemos mane jar instrucciones 
que cabna esperar del jugador pero que no seran 
de ayuda en su situaci6n. En la rutina "fantasmas" 
se emplea un ejemplo de este enfoque. 

Si un jugador se encuentra con un fantasma, su 
primera idea podria ser LUCHAR o MATAR (jen el 
caso de que uno pudiera ma tar a los fantasmas!) . 
La rutina h " fantasmas" trata estas dos instrucciones 
llamando a una subrutina especial. Esta subrutina 
simplemcnlc visualiza un mensaje que senala que 
estas instrucciones no le son de ayuda al jugador, 
pero lo hace de tal forma que es sustancialmente 
mas atractiva que limitarse a expresar un escueto 
NO C0MPRENDO. 

4290 REM * * * * S/R FANTASMA AL AZAR * * * * 
4295 SF=1:GC^0 

4300 SNS="SIENTES QUE UN ESCALOFRI0 TE REC0RRE" 
4305 SN$=SN$+ " LA COLUMMA VERTEBRAL. DE PRONTO UNA 

APARICION BLANCA" 
4310 SNS-SNS+" SALE DE ATRAS DE LOS ARB0LES Y" 



4315 $N$-SN3+ ,L AVANZA HACIA T! ':GOSUB5500:REM 
F0RMAT0 

4320 : 

4325 SNS-"EL FANTASMA SE ACERCA MAS Y MAS";G0SUB 
5500 

4330 GC-GC+1 IF GC>4 THEN G0SUB4455:REM 
4335 PRINT:INPUT"INSTRUCCIONES":IS$ 
4340 GOSUB2500:REM DESCOMPONER INSTRUCCION 
4345 IF F=C THEN 4325 REM SIGUIENTE INSTRUCCION 
4350 OP=P:GOSUB3000:REM ANALIZAR INSTRUCCION 
4355 IF MF=1 AND VBS- "'AVANZAR" THEN GOSUB4400: GOTO 4325 
4357 IF MF=1 AND VBS="MIRAR" THEN GOSUB2000GOSUB2300: 
G0T04325 

4360 IF VF=1 THEN 4325;REM SIGUIENTE INSTRUCCION 

4365 REM " PALABRAS 0E INSTRUCCION NUEVAS ** 

4370 IF VB$=" MATAR" OR VBS=' L LUCHAR" THEN G0SUB4425;GOT0 

4325 
4375 : 

4335 IF VBS= 11 CANTAR" THEN GOSUB4500: RETURN 
4390 SNS=N0 C0MPRENDO" :GOSUB5500:GOT04325 
4395 : 

4400 REM * 4 TRATAR DE M0 VERSE " 

4405 SNS=" ESTAS PARAUZADO POR EL TERROR V NO PUEDES" 

4410 SNS=SNS+ a MOVERTE...TODAVIA"':MF-0-GOSUB5500: P=0P 

4415 RETURN 

4420 ; 

4425 REM " LUCHAR 0 MATAR " 

4430 SN£= L, EL FANTASMA ES UN SER SOBRENATURAL" 

4435 SN$=SN$+ L ' YSE RIEDETUS DEBILES INTENT0S" 

4440 SNS=SNS+" POR HER! RL0 ' : G OS UB5500 

4445 RETURN 

4450 : 

4455 REM MUERTE " 

4460 SN$="EL DOLOR QUE S1ENTES EN EL PECH0 SE VUELVE 
INSOPORTABLE" 

4465 SN$=SNS+" Y TE DESPLOMAS S0BRE EL SUELO CUBIERT0 DE 

H0JAS DEL BOSQUE." :GOSUB5500 
4470 SN$="TU ESPIRITU SE DESPREMDE DE TU CUERPO INERTE 7 ' 
4475 SN$=SN$+" YTE ALEJAS FL0TAN00 ENTRE LA NIEBLA PARA 

UN1RTE 

4430 SNS=SN$^ m A LAS OTRAS ALMAS ATORMENTADAS OE" 
4485 SN$=SNS+"' EL BOSQUE ENCANTAD0. n :G0SUB5500 
4490 END 

Una pequena trampa 

De impart irse algun a de las instrucciones normales, 
o instrucciones que no lc sirven de nada al jugador, 
la rutina las o be. decora, si le es posible, y saltara 
hacia atras del bucle para una nueva instruccion. 
Esta rutina ticnc una pequena i ramp a, porque lleva 
la cuenta del numero de instrucciones impartidas 
por el jugador rnientras se mide con el fantasma. 
De impaitir mas de cuatro instrucciones, el fantas- 
ma mat a a I jugador. El unico medio de que dispone 
el jugador para escapar es CANTAR una cancion. Si 
el jugador opta por can tar, se le pide que elija cnlre 
tres canciones, una de las cual es (escogida al azar) 
"apaciguara al fantasma. Sin embargo, si el jugador 
elige una cancion erronea, su espiritu se unira al 
ejercito de almas atormentadas que se han extra- 
viado en El bosque encantado: 

4500 REM * * CANTAR * ' 

4505 SNS="-SABES TRES CANCIONES. CUAL ELEGIRIAS ?": 

GOSUB5500 
4510 SNS="1) EL TEMA MUSICAL 0E ' LOS 

CAZAFAMTASMAS'^GOSUBSSOO 
4515 SNS='2) 'HAY UN FANTASMA EN Ml CASA ';G0SU85500 
4520 SNS=' 3) 'BAJANDO POR EL RIO SWANEE" S :GOSUB5500 
4525 PRINT: INPUT" ELIGE UNA"" :CS 
4530 IF VAL(CS)>3 OR VAL(C$)<1 THEN PRINT PRINFN0 

VALE":G0T04525 
4535 CR = INT(RND(1)*3)+1 

4537 IF CRoVAL(CS)THEN G0SUB4542:REM CANCION EGUIV0CADA 

4540 G OS UB45 65: REM COR RECTA 

4542 REM "" S/R CANCION EQUIVOCAOA 

4545 SNS= ' EL FANTASMA TIENE UNA ESPECIAL AVERSION POR " 

4550 SNS=SNS+ "ESA MELODI A V SE ABALANZA SOB RE TL " 

GOSUB5500 
4555 &0SUB 4455: REM MUERTE 
4560 : 

4565 REM " CANCION COR RECTA ** 
4570 SNS- H EL FANTASMA SE APACIGUA AL OlRTE CANTAR LA 
MELODI A" 

4575 SN$=SNS+" Y SE EVAP0RA EN EL AIRE";GOSUB5500 
4580 RETURN 
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Listados Digitaya 

253c r - = r _ -E : = e i ' _ -e_- ,ir"ES 

27SX FP>77IO275fcRBIBKH0AZAR 

* GOSUB 5«20SEM8JCH0 




PAUSA 



: ift&= "S3ESLLEVADGAGRAN VE LOG I DAD HASTA UM NUEVO 

e :e : sis ESii: 
i raRi=mnoahfcxT:R 

i REM**** ALU"" 

RN=fNT(RND(Tl}*3+1) 
IFRN=1 THEM CDS="AND ir 
[F RN=2 THEN CD$= "OR" 
IF RN-3 THEN CDS = "NOT" 

SNS='M0NTAD0S SOB RE LA PARED HAY TRES BOTONES 
I S*=S«+"AND\ m Y "NOT" SE PUEOE GANAR ACCESO 
5\S = S\5 ^T_V j_iCOEk PULSAHDO EL BOTON 



Ik- 



4721 
4TQ 



-S2C 
-:2C 
4840 
4550 

4860 
4870 

4880 
4890 
4S0C 



lfVBS=-USAR-0RVB$=-PULSAftTfOM7« 
PRINT NO C0MPRENDO":G0TO467O 

Rai"INSTRUCCIONVALIDA** 

J VBS=" PULSAR 1 ' THEN 4930 

R£M " LA INSTRUCCIQN ES 'USAR' " 

3CSUB5730:REM ES VALIDO EL OBJETO 

F F=0THENPR!NT"N0 HAYNINGUN ";NNS;G0TO467C:REM 

SIGUIENTE INSTRUCC30N 

REM " ES EL OBJETO EL LIBRO DE CODIGOS ** 
IF F=7 THEN4850:REM OK 

SN$="TU 11 + IV$(F,1)+"NO SIRVE DE NADA" :GQSUB5880 
6OTO4S70:REM SIGUIENTE JNSTRUCCION 

OV=7:GOSUB5830rREM LLEVA EL LISRO DE CODIGOS 
CONSIGO 

jfhf=1then4900:rem ok lo lleva 

sns= jl tu no tienes el "+iv$[7,t) 

gosu85s80:g 0t0 4670 :r e m siguiente instruccion 

sns-^abres el libro de codigos y encuentras la 
-_-e-- ■ =s:rfa dentro 1 

:iE_E:::: ::~:-f _ : =EV S 3U ENTE fNSTRUCClON 
=RBI " J BCTUOON ES PULSAR " 

.<=•: = := v*s« --E\-r: 
- o ::e.E:ee: :::-r: -e 



:i e:": 




EE EC 

=:-c 

9BGQ 

5080 
990 
5100 

5110 
5120 

5130 



MBIOfttA PRJMOPAL* 
GOSUB 5380:REM FORMATEAR 
IFRN=1 THEN P=39 
IFRN=2THEN P=35 
IF RN-3 THEN P=29 
MF=1: RETURN 

REM "S/R COR RECTO ** 

SNS="SE ABRE LA PUERTA QUE CONDUCE AL ACUMULADQR* 
SNS=SNS+ (I YTU LA ATRAVIESAS ' GOSUB 5880 
P=30:MF=1:RETURN 



Si20 REM * * * * BICHO AL AZAR * * * * 
5430 SF=1 

5440 SNS=" UN BICHO ENORME Y ASQUEROSO SE ASOMA POR 

DETRAS DE UN CHIP" 
5450 SN£=SN$+" Y SE ABALAN2A SOBRE TI":G0SUB 5680 
-_- " ■ 

5470 REM ** INSTRUCCIONES ** 
5480 PRINT:lNPUT'INSTRUCCIONES";lS$ 
5^90 GOSUB1 700GOSUB1900:REM ANAUZAR 
5500 IFMF=1THENMF=0:PRINT"N0 PUEDES 
MOVERTE...T0DAVIA-G0TO5480 



5510 fFVF=1 THEN5480:REM SIGUIENTE INSTRUCCION 
5520 I F VBE = 1 ' M ATA.R ' 0 R VBS = " LUCHAR "THEN5550 
5530 PRINT" NO COMPftEiW:G0T05480 
5540 : 

5550 REM " LA INSTRUCCION ES LUCHAR/MATAR * * 

5560 RA= RIMD(TI) 

5570 IFRA<0.5 THEN GOSUB5600 

5580 G0SU85670:RETURN 

5590 : 

56GC REN' * 3 R EL BICHO TE MATA * 

5610 SNS«TUCHAS CON EL BICHO. TE ARROJA UNA LLUVFA DE" 

5620 SNS=SN$+" DE ERRORES DE PROG RAMA QUE HACEN 

ESTRAGOS ENTU CEREBRO." 
5630 SN$*SN$+" FINAL MENTE YA NO PUEDES ABSORBER MAS Y 

TE ESTALLA LACABEZA." 
5640 G0SUB5880 
5650 END 
5660 : 

5670 REM "" SfH TU MATAS AL BICHO 
5680 SNS= "LUCHAS CON EL BICHO Y A PESAR DE QUE LA PELEA ES 
DURA" 

5690 SNS=SN$+" FINALMENTELO VENCES YLOGRAS 
S0BREVIVIR.":G0SU85880 



5700 RETURN 




Complementos al basic 

Spectrum: 

En ambos programas, reemplace SN$ por S$, IS$ 
porTS, IV$(,)porVS(,), VBS porBS, CDS porCSy 
NNS por R$. 

En el listado de El basque encantado sustituya las 
siguientes li'neas: 

207 RAND 

4815 IF F<>2 THEN LET S$="EL":LET 
A$=V$(F,1):GOSUB7000 

4816 IFF<>2THENLETS$=S$+"N0 
SIRVE DE NADA':GOSUB5500:GOTO 4725 

En el listado de Digitaya reemplace las lineas 
siguientes: 

2750 LETRN=RND(1) 
2820 LETP=JNTiRND(1)-4C-" 
4570 LETRN=INT(RND(1)*3+1) 
4820 LETSS=-TU-:LETA5=VS(F.1): 

GOSUB 8500 
4825 LET SS=SS+" NO SIRVE DE 

NADA":G0SUB5880 
5560 LET RA=RND(1) 

BBC Micro: 

En el listado de El bosque encantado reemplace estas 
lineas: 

207 RND(-TIME) 
4535 CR = RND(3) 

En el listado de Digitaya reemplace estas lineas: 

2750 RN=RND(1) 
2820 P=RND(40)+7 
4570 RN=RND(3) 
5560 RA=RND(1) 
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Dibujos cicloides 

Iniciamos una serie en que estudiaremos el uso del logo en la 
creacion de patrones geometricos 



A lo largo del curso habiamos ofrecido un me to do 
scnrillo para dibujar un drculo utilizando cl logo: 

TO CIRCULO 

REPEAT 360 [FORWARD 1 RIGHT 1] 
END 

Esto dara una aproximadon bastante acertada a lo 
que cs un circulo. No obstante, el dibujo se realiza 
con una extraordinaria lentitud, si bien se lo puede 
acelerar un poeo cscondicndo la tortuga. Si en su 
pantalla este procedimiento no se parcce a un circu- 
lo, entonces debera volver a determinar la propor- 
cion de tamanos: habra de experimentar una y otra 
vez hasta obtener un circulo y no una elipse. 

Por supuesto, en realidad CIRCULO no dibuja un 
circulo. Dibuja un poligono de 360 lados; pero, en 
la mayoria de los casos, esta es una aproximacion 
muy accptablc. De hecho, muchas veces un poligo- 
no de 60 lados, o incluso de 30, ya es bastante ade- 
cuado y resulta mucho mas rap i do de dibujar. En 
este proyecto nuestros circulos scran polfgonos de 
60 o 120 lados, pero usted puede modi near esto si 
asi lo desea. Los numeros mayo res da ran mayor 
detalle; con los numeros menores se obtendra un 
dibujo mas rapido, 

En primer lugar, vamos a considerar que es en 
realidad un cicloide. Imaginese un circulo que 
rueda a lo largo de una linea recta. Marque un 
punto de la circunferencia de su circulo imaginario 
y luego rastree el camino que sigue este punto 
mientras el circulo se desplaza por la line a. El cami- 
no resultante es lo que se conoce como cicloide, 
Utilizaremos esta definition como ayuda para cons- 
truir un programa que nos dibuje uno. 

Como una primera aproximacion al cicloide, to- 
maremos "instantaneas" despues de cad a giro de 6° 
de un circulo que gire a lo largo de una linea que 
atraviese la pantalla. Cuando el circulo gira 6°, se 
mueve (2 x pi x radio + 60) unidades a lo largo de 
la linea. De modo que la coordenada x del centro 
del circulo se habra incrementado en la misma pro- 
porcion (la coordenada y, por supuesto, no se vera 
afectada). A I mismo licmpo, la orientation de la 
linea que unc cl ' punto de dibujo" con el centro del 
circulo se habra incrementado en 6°. 

La est rate gia utilizada en el programa implica 
tres tareas sencillas: 

1. mover el centro del circulo; 

2, colocar la tortuga en el centro; 

3. apuntarla en la direction correcta; 

4, moverla hacia adelante por la longitud del radio. 
Con eilo la tortuga llega hasta la siguiente posi- 
tion del punto de dibujo. En este momento dibuja- 
mos un punto en la pantalla y despues repetimos 
todo el proceso. 

El procedimiento PREPARARPANTALLA es la pri- 
mera I lam a da a procedimiento desde CICLOIDE: se 



encarga de algunos detalles menores necesarios 
para la visualization. Las principales tareas de PRE- 
PARARPANTALLA son determinar la proportion de 
tamanos (usted necesitara un valor diferente del 
nuestro) y seleccionar la modalidad N0WRAP (no 
desplazamiento), de modo que el programa se de- 
tenga cuando la curva se saiga de la pantalla, 

TO M0VERCENTRO 

MAKE "XCENT :XCENT 4- ;PAS0 
END ' 

TO PUNTO 
PD 

FORWARD 1 
BACK 1 
PU 

END 

Si, en lugar de tomar un punto de la circunferencia 
del circulo generador. rastreamos el camino efec- 
tuado por un punto dentro del circulo, entonces ob- 
tenemos lo que se conoce como un cicloide abrevia- 
do. Si torn am os un punto exterior al circulo, pero 
unido a el, obtenemos otra clase de cicloide: un ci- 
cloide prolongado. Para observar estos efectos po- 
demos modificar CICLOIDE para que tome una en- 
trad a que represente la distancia del punto de di- 
bujo respecto a la circunferencia. Los valores posi- 
tives dan cicloides abreviados: los valores negati- 
ves, cicloides prolongados: 

TO CICLOIDE 

PREPARARPANTALLA 
MAKE "ANGUL0PAS0 6 
MAKE il PI 3.14 
MAKE "RADIO 15 

MAKE "CIRCUNFERENCIA 2* :PI* :RADI0 
MAKE ' PASO ;CIRCUNFERENCIA'(360/:ANGUL0 
PASO) 

MAKE l XCENT(-150) 
CIC 0 
END 

TO PREPARARPANTALLA 

.ASPECT 0.93 

N0WRAP 

DRAW 

PENUP 

HT 
END 

TO CIC :ANG 
M0VERCENTRO 
SETXY :XCENT 0 
SETH :ANG 
FORWARD : RADIO 
PUNTO 

CIC :ANG + :ANGUL0PASO 
END 



m 



TO CICLOIDE :DESPL 
PREPARARPAMTALLA 
MAKE "ANGULOPASO 6 
MAKE "PI 3,14 
MAKE "RADIO 15 

MAKE "CIRCUNFERENCIA 2* :PI* :RADI0 
MAKE "PASO : C I R C U N FE R E M C I A/{ 36 0/ 
:ANGUL0PASO) 
MAKE ' XCENT{-150) 
MAKE "DISTANCIA :RADIO-:DESPL 
CIC 0 
END 

TO CIC :ANG 
MOVERCENTRO 
SETXY :XCENT 0 
SETH :AMG 

FORWARD : DISTANCIA 
PUNTO 

cic :ang+:amgulopaso 
en; 



Unir los puntos 



B marcar los puntos con puntos. como hemos veni- 
do badendo hasta ahora. nos proporciona una 
forma sencilla de visualizar lo que esta sucediendo. 
pero obtendriamos diagramas mas atractivos si pu- 
dieramos unir los puntos entre si para formar una 
cnrva. El procedimiento UNIR dibuja una linea 
entre dos puntos: 

TO UNIR :A :B 
ESTPOS :A 
PD 

ESTPOS :B 
PU 
E'.D 



TO ESTPOS :P0S 

SETXY FIRST :P0S LAST 
END 



POS 




-'. r:?;edimiea1 ' utilize con las coordenadas de 
Ids dos puntos dados en ia llamada. Por ejemplo, 
posibfe es UNIR [12 34][67 89]. En 
ide adoides. deberemos llevar un 
i del punto. y despues 
EJ resultado final de 
prifrrriflii para dibujar a- 

~: : :.: :e :e: ; _ 
make "angulopaso 6 

MAKE "PI 3.14 
MAKE "RADIO 15 
7AKE "CIRCUNFERENCIA 2* :PI* 
: RADIO 

MAKE "PASO :CIRCUNFERENCIA'(360/ 
:ANGUL0PASO) 
MAKE "XCENT(-150) 
MAKE "DISTANCIA :RADI0 - 
:DESPL 

MAKE "POSANT LIST :XCENT 
:DISTANCIA 
CIC 0 
END 

TO CIC :ANG 
HOVERCENTR0 



SETXY :XCENT 0 
SETH :ANG 

FORWARD :DISTANCIA 
MAKE "POSNUE POS 
UNIR :P0SANT :P0SNUE 
MAKE "POSANT :POSNUE 
CIC :ANG+ ANGULOPASO 
END 

TO POS 

OUTPUT LIST XCOR YCOR 
END 

Quiza le interese realizar algunos experiments ton 
estos procedimientos. Por ejemplo, los libros de 
texto de matematicas afirman que jla longitud de 
un arco de un cicloide es igual al perimetro de un 
cuadrado circunscrito en el ci'rculo generador! In- 
tente modificar los procedimientos para dibujar ci- 
cloides que le permitan comprobar este teorema. 

Si posee un logo que incorpore sprites, una 
forma diferente (y mejor) de escribir el programa 
seria establecer el punto de dibujo como un sprite. 
Este procedimiento tiene una ventaja: usted siem- 
pre podria averiauar la situation del punto median- 
te el empleo de TELL v despues XCOR e YCOR. 



El cuadrado circunscrito 




El arco ciclnide 



Complementos al logo 

Para todas las versiones LCSI: 



120 



La sintaxis IF es diferente; por ejemplo: IF ;A 

[STOP]. 

SETPQS y POS existen como primitivas. 
SETXV debera sustituirse pgr SETPOS (que 
requiere una iista como entrada). 
UtiliceCS por DRAW. 

Para NO WRAP utilice FENCE (FENCE no existe en el 
logo Atari, de manera que em pi ee WINDOW y 
luego < BREAK> para detener el procedimiento). 

Para establecer la proportion detamanos utilice: 

.SETSCRen el Atari; 
SETSCRUNCHen el Apple; 
SETSCRUNCH, seguida de una Iista, en el 
Spectrum 



Rodando 

Un cicloide es la curva descriia 
por ei movimiento de un punto 
en un radio fijo de un circulo Que 
rueda a lo largo de una linea 
recta. La naturaieza de la curva 
difiere en funcitin de si el punto 
sehailadentro, fueraoen ei 
perimetro del circulo 



OGUMQE10 



RAD HO =26 



flADIO 




— = -: : 



3367 



Generacion de 
hipercictoides 

Nuestra investigation de patrones geometricos en 
logo comenzo con la generacion de cicloides, las 
curvas que describen los circulos al rodar sobre una 
Imea recta; sin embargo, con ello no se agotan, de 
ninguna manera, las posibllidades del circulo 
movil. 

En lugar de desplazarse a lo largo de una linea 
recta, el circulo generador podria girar dentro de 
otro circulo; el camino que recorreria el punto de 
dibujo en este caso seria un hipercicloide. 

El problema continua siendo basicamente el 
mismo; aun necesitamos mover el centro del circu- 
lo generador y luego pasar al punto de dibujo de la 
circunferencia, Sin embargo, ahora necesitamos 
llevar el registro de dos angulos de paso. Uno (AN- 
GULOPASO) es para calcular el camino del centro 
del circulo generador, y el otro (ORIENTPASO) lleva 
el registro de la orientation del punto dibujado con 
respecto al centro de este circulo- Puesto que el 
centro del circulo mas pequeno gira, el punto di- 
bujado gira en la direction contraria. Se puede de- 
mostrar que los tamanos de los dos angulos de paso 
estan relacionados si aplicamos la formula que 
transcribimos a continuacidn: 

ANGULOPAS0=ORIEMTPAS0 X 
(RADI01/RADI02-1) 

donde RADI01 es el radio del circulo fijo y RADI02 
es del que gira. 

El procedimiento HIPERCICLOIDE toma como en- 
trada RAD 1 02, permitiendonos, por tanto, rastrear 
varios hipercicloides dife rentes. 

TO HIPERCICLOIDE :RAD102 
PREPARARPAMTALLA 
MAKE "PI 3.14 
MAKE "RADI01 60 
MAKE "DIFEREMCIA :RADI01 - 
:RADI02 

MAKE " ORIENTPASO 6 

MAKE " CIRCUNEERENCfA 2 T ;Pr 

:DIFERENCIA 

MAKE TASO:CIRCUNFEREN CIA/ (3607 
[ORIENTPASO) 

MAKE "ANGLlLOPASO :0RIENTPAS0* 
(;RADI01/:RADJ02-1) 
MAKE "CENTRO LISTA 0 
:DIFEREI\JCIA 
MAKE "ORIENT 0 
MAKE "XCENT 0 
MAKE " POSANT LIST :XCENT 
:RADI01 
HCICO 
END 

TO HCIC :ANG 

MQVERCENTRG2 

ESTPQS POS 

SETH :ANG 

FORWARD :RADI02 

MAKE "POSNUE POS 

UNIR :P0SANT :P0SNUE 

MAKE 1 POSANT :P0SNUE 

HCIC :ANG - :ANGUL0PAS0 
EMD 

TO MOVERCENTR02 



SETXY 0 0 
SETH :0RIENT 
FORWARD :DIFERENCIA 
MAKE "CENTRO POS 
MAKE " ORIENT :GRIENT+ 
:ORIENTPAS0 
END 

Hay un caso especial interesante: si el radio del cir- 
culo que rueda es la mitad del radio del circulo fijo, 
jel hipercicloide se convierte en una Imea recta! De 
este modo, el movimiento dentro de un circulo se 
transforms en movimiento a lo largo de una linea 
recta, 

Tal vez desee modificar los procedimientos para 
averiguar lo que sucede si el punto se halla dentro 
del circulo o fiiera del mismo, 

Otro procedimiento: 
el "cosido de curvas" 

El cosido de curvas es otra forma de desarrollar al- 
gunas form as interesantes a partir de circulos. 
Tome dos circulos concentricos y tracelos en una 
gran cantidad de arcos iguales, supongamos 120. 
Numere los puntos y despues unalos, de uno en 
uno, a los puntos del otro circulo de acuerdo con 
alguna regla sencilla; por ejemplo. x "se une a" 2x. 
Los resultados pueden ser sorprendentes. 

Esta actividad en realidad se puede llevar a cabo 
con aguja e hilo. por lo cual a menudo se alude a 
ella como cosido de curvas, Tambien se puede rea- 
lizar con lapiz y papel; pero, obviamente, preferi- 
n'amos que usted utilizara el logo. 

Esta es nuestra version para un programa de co- 
sido de curvas: 

TO PREPARACION 
MAKE "RADI0A 80 
MAKE "RADI0B 60 
DRAW 

HT 

PEN UP 

DIBUJAMLO 0 0 
END 

TO DIBLUARLO :A :B 

IF:A = 120 THEN STOP 

UNIR PTA :A PTB :B 

MAKE "A :A+1 

MAKE "B 2* :A 

DIBUJARLO :A :B 
END 

TO PTA :NUM 

SETXY 0 0 

SETH :NUM*3 

FORWARD : RAD I OA 

OUTPUT POS 
END 

TO PTB :NUM 

SETXY 0 0 

SETH :NUM*3 

FORWARD : RADIOES 

OUTPUT POS 
END 

Es posible que le interese investigar los patrones 
generados por otras reglas, tales como x -> 3*, 
x —* Ax, etc. 
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Companero de cla ses 

EI Link 480Z, la mas reciente creation de Research Machines, es 
un ordenador concebido especialmente para la ensenanza 



El Link 480Z se vende en una version normal, que 
es la que analizaremos aquf, y en una version para 
conectar en red. A primera vista parece muy distin- 
to de su predecesor, el 38QZ. Mientras que cste se 
compone de una gran caja rnetalica de color negro 
que contiene el ordenador y las unidades dc disco 
conectados mediante un cable al teclado externo, el 
Link 480Z posee una solida carcasa plastica, con el 
.teclado mcorporado y las unidades de disco sumi- 
nistradas en una unidad externa opcionak El 480Z 
- . - ~ - - :r— .-.I rnide 520 x por 330 x 
Sbmm^pexo&a aspecto estilizado es mas agrada- 
Ue qae d dei fuaciofial y mis bien feo 380Z. 

La onqna posee un tedado estandar QWER- 
TY tipo maquina de escribtr y las teclas son firmes, 
con una seguridad de tacto que las hace ideales 
para el tratamiento de textos. Las teclas de control, 
induyendo una de safto de Hnea y Repeat para fun- 
eiones de edition en pantalla. estan situadas a la 
izquierda y derecha del trazado QWERTY. La 
uniea objecion que sc Ic puede hacer al teclado es 
que la tecla Return quiza sea demasiado pequeiia, 
lo que dificulta su uso. 

En el lado derecho del teclado hay un grupo de 
teclas para control del cursor. En cada una de las 

. dnas del grupo hay una tccla de fund on progra- 
z. los fines de estas dependen de la aplicacion 
que se ejecute. 

Una gran selection de puertas para interface, si- 
tuadas en la parte posterior de la maquina, permi- 
ten conectar el ordenador a una amplia gam a de 
perifericos. En el extreme izquierdo hay un conec- 
tortenfea RF, que permite enchufar la maquina a 
■b idbvaoi Mrnaiini A la derecha esta el boton de 



: :ztr. 7t< z.sztm^ z:ti 
WN ana? panlbs. que 

1 _! li 71T.ll- 




i utius Qpos de 
TTL y RGB. Errrre hts paenas pen y a utafa y 
para cassette hay una mierface accesoria. Esta es 
ma puerta de entrada salida en serie que permite la 
::r.exion de dispositivos externos. 

A la derecha de la puerta para cassette se halla la 
: _ir:; de entrada salida en paralelo, para la cone- 
xi6o de dispositivos en paralelo (impresoras, p. 
ef.). Si bien la interface no es una Centronics est&n- 
iai, es compatible con esta, lo que significa que si 
■ : - ^stan presentes todas las lineas necesarias para 
: rrositivo Centronics, estas no estan situ ad as 
:: : :rden eorrecto, Un pequeno rea juste del ca* 
bfeado ofrecena una puerta Centronics totalmente 

E. Link 430Z posee a si mis mo un par de puertas 
tz serie RS232 que permiten conectar la maquina 
= ■ ■ : e f.izt a d ispositivos talcs como impresor as e n 
y las unidades de disco gemelas, Junto a las 



puertas en serie hay 10 inierruptores DIP, El pri- 
mer interruptor > senalado con una R, permite que 
el operador desactive el interruptor RESET, Del 
mismo modo, el scgundo interruptor permite acti- 
var o desactivar el altavoz intcrno, situado debajo 
del teclado, 

Los ocho interruptores DIP situados en el extre- 
mo izquierdo de este grupo permiten que el usuario 
establezca la direction dentro de la red; estos son 
leidos como un numero binario para dotar al orde- 
nador de una identification cuando se lo conecta en 
red. Dado que el 480Z posee ocho de estos inte- 
rruptores. permite la conexion en red de hast a 256 
maquinas diferentes. El cable para la red esta insta- 
lado en un enchufe hembra de video en la parte 
posterior del ordenador. lugar donde tarn bien hay 
un venrilador para mantener refrigerado el ordena- 
dor, un interruptor de on/off, un fusible y el cable 
de torn a de corriente. 

Las unidades de disco 

La unidad de disco gemela MD2 esta separada del 
ordenador. Sorpre nd e n te m en te , tratandose de un 
micro moderno, el modelo estandar se conecta a la 
maquina a traves de una interface en serie y no en 
paralelo, y se enchufa en la segunda puerta RS232. 
A pesar de esto, la ve loci dad de transferencia es de 
38,5 Kbaudios, comparable a la de muchos micros 
con transferencia de datos en paralelo, Las unida- 
des gemelas ulilizan los discos flexibles esta rid ares 
de 5 1/4 pulgadas; estos son de doble cara y doble 
densidad y estan rotufados A, B, C y D. La carcasa 



Aspecto elegante 

El teclado sesgado y la carcasa 
plasties le confieren a la 
maquina un aire mas elegante 
quesu predecesora, el 380Z, si 
bien de acuerdo a las pautas 
modern as sigue siendo una 
maquina grande, Ello se debe a 
que dentro de la maquina hay 
dos niveles de placas de circuity 
impreso, una para las funciones 
principales del ordenador y otra 
para trabajar en red 
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de fa unidad es del mismo plastico resistente que la 
del ordenador, y en funcionamicnto es surname rite 
silenciosa en comparacion con otras maquinas de 
oficina que se venden al doble de precio. 

Detras de las unidades hay un par de conectores 
RS232, uno para conectar al 480Z y el otro para 
co nectar dispositivos "en margarita"; tambien po- 
seen su propia fuente de alimentation electrica. El 
sistema de archivo en disco, que admin istra la 
transferencia de datos hacia y desde el ordenador, 
esta instalado dentro de la carcasa de la unidad y no 
dentro de la propia maquina. Este empleo de uni- 
dades de disco "inteligentes" significa que el orde- 
nador puede estar cumpliendo otras funciones 
mientras la gestion de los discos corre a cuenta de 
las propias unidades, con lo cual fa memoria queda 
para uso del sistema, 

Cuando se conecta la maquina, se le solitita al 
usuario que entre el basic ampliado basado en 
ROM o bien que vea el menu HELP (de ayuda). 
Pulsando H (de Help) se visual iza la lista de opcio- 
nes disponibles basadas en ROM. Estas se refieren 
fundanicntalrnenle al sistema de entrada/salida. El 
operador puede optar por cargar programas del sis- 
tema ya sea desde cassette o desde disco, o cargar 
el sistema de red. Tambien se pueden seleccionar la 
velocidad de la cassette o las opciones de impreso- 
m* Hay una option Front Panel (basicamente, un 
monitor de memoria) que permite al usuario exa- 
minar y modiftcar los registros del procesador y las 
posiciones de la memoria. Relacionada con esta op- 
don esta fa instruction Jump (saltar), que permite 
pasar el control a una direction de la memoria, Por 
ejemplo, la instruccion J 103 le pasa el control al 
vector de "arranque en caliente". 

Resofucidn de pantalla 

El 480Z dispone de numerosas modalidades de re- 
solution de pantalla. £stas van desde la pantalla 
para textos de 80 por 25 hast a la visualization de 
resolution ultra alta, de 640 por 192 (si bien esta 
solo admite dos eolores en pantalla). Hay, ademas. 
tres modalidades de color que, en resolucion 
media, soportan la garna completa de 16 eolores, 

Al igual que el 38GZ, el Link 480Z utiliza el mi- 
cro procesador Z80\ que le permite ejecutar una 
amplia gam a de software disponible, incluyendo, 
por supuesto, el sistema operativo CP/M. La dispo- 
nibilidad de software quiza hay a si do la causa pri- 
mordial por la cual Research Machines decidiera 
continuar con este chip en vez de adoptar un proce- 
sador mas moderno. Si bien la empresa sostiene 
que el 380Z y el 480Z tienen compatibilidad de 
software, ciertos programas llamados desde basic 
generan un error de disco cuando el 480Z intenta 
leer el disco. 

En el interior de la maquina se ha dejado espacio 
para la adicion de chips extras, Aunque esta facili- 
dad no es comparable con el 380 Z, que esta disena- 
do de mo do que las placas extras se pucdan instalar con 
sum a facilidacL si significa que se pueden a nadir apliea- 
cioncs basadas en ROM, como puede serel con vert idor 
de digital a analogieo para permitir la eonexion de la 
puerta accesoria a un dispositive analogico. 

Con el ordenador viene un disco de sistema que 
incluye numerosos programas de demost ration, 
una version de basic con instrucciones para gestion 
de disco y el sistema operativo CP/M, 




proce 

Altavoz 
incorporatfo 

Se puede desactrvar 
mediante Ids 
interruptorea DIP 
situados en la parte 
posterior de la maquina 



ROW de basic 
Estos chips contienen el 
basic incorporado 




Unidades 
gemelas 

Cada unidad esde doble cara, 
dando un total de cuatro caras a 
las ouales accede r. Estas, 
siguiendo la convention CP/M, 
estan rotuladas como A, B, C y 
D. La unidad acepta discos de 
doble densidad, lo cual le 
permite a la maquina almacenar 
el doble de informacibn en cada 
cara de los discos. Adema's, 
Research Machines ha 
producido una unidad de 
densidad cuadruple 
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:= zri:: 
defitnjdeiifisi5tesis«te 
conexion earedse puede 
establecer con a ajusEs de 
8 de estos interruptores. 
Interruptores DIP adicionales 
permiten activar y desactivar 
elaitavozy el boton de RESE T 



lYIodulador RF 

Este dispositivo proporciona 
la serial para activar urt 
aparato de television normai 




El dfcedo del Link 4S0Z parece sugerir que la 
fc nci6n de Research Machines ha sido desarrollar 
ordenador para satisfacer a los usuarios escola- 
que. no necesitando de La solid a flexibilidad del 
Z. si requieren una maquina adaptable de pro- 
no general En este sentido no cabe duda de 
; la empresa ha acertado. Sin embargo, es una 
epcion encontrarse con que la maquina Introdu- 
ran pocas innovaciones, y su enorme tamano 
itinua siendo un misterio. Al mantener el chip 

. la empresa decidio que la disponibilidad de 
tware a un precio ascquible sobrepasa con creces 
iquier otra ventaja que hubiera podido obtener 
scosia un procesador mas moderno de 16 bits. 

o:ra parte, los lotes de software de los paquetes 
glares son una ganga. No obstante, en una 
ca en la que el IBM-PC se esta convirtiendo en 
■ssindar para las maquinas de oficina, la election 
en lugar del chip Intel 8088, parece traslu- 
3£a cierta estrechez de cruras. 



Paquete escolar 

El lote de software del paquete escolar que se 
entrega con si 480Z ofrece unas prestaciones 
excelentes. Se suministran 12 paquetes basados en 
disco, todos de gran valor educative. 
En el lote se incluyen cuatro lenguajes. El sbas es 
una version de basic estructurado y esta 
considerado como una implementation excelente. 
Contiene una amplia gama de estructuras de 
control para el flujo del programs incluyendo 
WHILE., .ENDWHILE, CASE... ENDCASE e 
IF...END1F. Dispone asimismo de procedimientos y 
de variables giobales y locales. La maquina 
tambien soporta una amplia implementation del 
pascau que le ofrece ra al estudiante un 
conocimiento operative completo de este lenguaje. 
La documentation que se proporciona con el 
lenguaje no es de facil lectura, pero es muy 
detaflada. Tambien se ofrece logo en una version 
excelente, si bien algunas instrucciones no son 
estandares. Porejemplo, esta version utiliza la 
instruction BUILD (construir) en lugar de TO para 
crear procedimientos. Existe tambien una 
implementation partial del logo, denominada 
ARROW. Para la pronramaticm de bajo nivel T el 
ZASM proporciona el lenguaje ensamblador Z80 
para el desarrollo de programas en lenguaje 
maquina. 

Como ayuda al desarrollo de la habilidad de teclado 
y proceso de textos se proporcionan cuatro 
programas diferentes. El Touch'n'Go esta disefiado 
para desarrollar la destreza en la mecanografia al 
tacto, WORD es un curso de proceso de textos para 
principiantes, concebido para ensenarai alumno 
los principios y las tecnicas que se emplean en el 
tratamiento de textos. Para una implementation 
completa, en eJ lote tambien se incluye el 
WordStar. TXED es un editor de textos que se 
puede utilizar ya sea para tratamiento de textos o 
bien para desarrollo de programas. 
Quest-D es una base de datos disenada para 
enserlar los principios del almacenamiento y fa 
recuperation de datos, Mas especiafizado es el 
SIR, destinado a catalogar los recursos de fa 
biblioteca de fa escuela y para enseriar las tecnicas 
de fas funciones de gestion de una biblioteca. 
Por ultimo, Tefesoftware es un sistema de 
videotexto particufarmente util al utiiizarlo junto con 
las capatidades de red del 48GZ. 
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DIMENSIONS 



520 x 330 x 80 mm 



Z80, operando a 4 MHz 



MEMORIA 



64 K de RAM 



PANTALLA 



Texto: 80 x 25 caracteres 
Resolution media: 160 x 192 
con 16 colores 

Alta resolution: 320 x 192 con 
cuatro colores 

Resolution ultra alta: 640 x 192 
con dos colores 

Puerta RF, pantalla, RGB/TTL, 
puerta accesoria, cassette, 
puerta en parafelo, dos puertas 
en serie, red, enchufe de video 
para conexion en red 



LENGUAJ6S DISP0N1BLES 



BASIC. LOGO y PASCAL 



TECLADO 



65 teclas, incluyendo tecfas de 
funcidn y de control del cursor 

Los manuales son exhaustivos y 
contienen toda la information 
necesaria tanto para el 
principiante como para el usuario 
avanzado. Sin embargo resulta 
d iff oil haflar parte de la 
information 



VENTAJAS 



El Link 480Z se ha desarrollado 
para su uso en la clase y en 
much os sentidos es ideal para 
fas escuelas. La capacidad para 
ejecutar CP/M y la rlqueza de 
software disponible, junto con 
sus capatidades para conexion 
en red, le confieren gran 
versatilidad. El ordenador esta 
bien construido y puede servir 
durante muchos arios 



Se trata de un ordenador 
anticuado que, al compararlo con 
maquinas que ofrecen 
capatidades similares t parece 
tener un precio excesivo 



1371 




Software 



Paquetes ef icientes 

Examinemos cuatro programas destinados a microordenadores 
personates: "Micro Swift", "Practicalc II", "PS" y "Vizastar" 



Micro Swift, Practicalc II, PS y Vizastar pertenecen 
a la nueva clase de paquetes perfeccionados basa- 
dos en hoja electronica, que evidememente estan 
inspirudos en el paquete iniegrado Lotus 1-2-3 y eri 
su sucesor, el Symphony. Pero mientras que el 1-2- 
3 y el Symphony se escribieron para el IBM-PC y 
maquinas compatibles (para ejecutar el 1-2-3 se re- 
quieren 296 K de memoria para el usuario, y el 
Symphony cxige un mmimo de 320 K), los nucvos 
paquetes estan disenados para micros personales. 
En muchos sentidos, los cuatro paquetes que 
vamos a analizar han hecho milagros para compri- 
mir muchas de las caracteristicas disponiblcs en pa- 
quetes mas grandes en los aproximadamente 30 K 
de memoria de que dispone el usuario de micros 
tales oorno el Commodore 64. 

Sin embargo, por el momento estos paquetes 
' l miniS ymphony" solo pueden ofrecer dos de las 
cuatro opciones que hacen que los paquetes mas 
potentes (y mas cams) scan tan atractivos. Dad as 
las actuates limitaciones de hardware, intentar in- 
corporar las cuatro opciones (hoja electronica, base 
de datos, tratamiento de textos y posibilidad de 
programacion) sin duda alguna habria exigido el 
tipo de concesiones que han hecho que el software 
basado en ROM Three- Plus-One del Commodore 
Plus/4 se hay a con vert ido en algo decepcionante. 

Ventajas relativas 

Consideremos algunas de las opciones que ofrecen 
estos cuatro programas con el fin de comparar sus 
ventajas relativas. EI PS, el Micro Swift y el Vizas- 
tar son, en mayor o men or grado, programa bles. 
Est a es una facilidad sumamente valiosa, puesto 
que permite al usuario automatizar f unci ones cuya 
ejecucion, de lo contrario, requeriria muchas pulsa- 
ciones de teclas; ello se consigue de la misma forma 
en que se emplean las macros de teclado cn el Lotus 
1-2-3.. Los tres programas lo hacen de forma diferen- 
te; analizaremos estos enfoques uno por uno. 

En el paquete PS los modulos se programan em- 
plean do instrucciones familiares del basic Estos 
mddulos se guardan luego pulsando <f3> y se eje- 
cutan utilizando <U>, o bien pueden ejecutarse 
automaticameme despues de la carga si son Salva- 
dor en disco con un punto y aparte despues del 
nombre del pro grama. El paquete posee tod a una 
gam a de utiles facilidades de programacion: por 
ejemplo, puede bifurcar a una subrutina de un pro- 
grama desde una f6rmula dentro de una celda sim- 
plemente insertando dentro de la f6rmula la ins- 
truccidn GOSUB, Pueden "definirse.funciones utili- 
zando la funci6n FN, y el programa tambten dispo- 
ne de la facilidad de pasar series de caracteres, fila 
y columna, y valores numericos. 

El Micro Swift se puede programar colocando 
una lista de instrucciones en la columna Z; la prime- 



ra instruction da el nombre del programa, preeedi- 
do por un signo numcrico (#) y la ultima linea con- 
vene la instruccion @ QUIT, Veamos un ejemplo 
sencillo; 

21 # SUM (sumar) 

Z2 (g SUM(A1,A3} (sumar) 

Z3 @ ASSIGN(Z2,A4) (asignar) 

Z4 (u QUIT (salir) 

Este programa sumara los valores contenidos en las 
celdas A1 , A2 y A3, y despues le asignara el result a- 
do, que ahora se haila en la celda Z2. a la celda A4. 
El programa es llamado mediante la instruccion # 
SUM. 

De todos los paquetes mencionados aqui, quiza 
el mas sencillo sea el Vizastar, puesto que las ins- 
trucciones consisten en las letras iniciales que se 
pulsanan para ejecutarlas de forma manual. Por lo 
tanto, para utilizar una base de datos espctifica, se 
pulsana la tecla CBM seguida de D(ata: datos), U(sc: 
usar). D(atabase: base de datos) y el nombre de la 
base de datos. For ultimo, pulsana <RETURN>. 
Para programar, se utiliza el signo de barra {/) en 
lugar de la tecla CBM, de modo que /DUDnombre- 
[RET] ejecutara la action si se pulsa <F8>. Las te- 
clas de funcion y edition se programan pulsando 
<CRTL> mas la tecla apropiada, y esta letra se im- 
prime cuando se utiliza la funcion en un programa. 
No obstante, cuando se programan de esta man era 
las teclas del cursor, est as se imprimen como [lip] 
(arriba), [down] (abajo), [left] (izquierda) o [right] 
(derecha). 

La base de datos del Vizastar es una implementa- 
tion muy potente que en realidad utiliza una sec- 
tion de la hoja que no esta disponible para el usua- 
rio (hi as de la 1 000 en adelante) para almacenar 
formatos de registros, Cada registro puede constar 
de hast a nueve pan tall as, y estos pueden ser accedi- 
dos mediante las instrucciones Key o Next, Prior, 
First, Last o Current (utilizando cada una la letra 
initial de un menu de instrucciones). Asimismo, los 
registros se pueden Add (sumar). Replace (modifi- 
car) o Delete (eliminar). 

Los campos tienen nombres de letras, empezan- 
do con la A y terminando con BK. que aluden a las 
column as de ese nombre en la hoja electronica. Por 
consiguiente, a modo de ejemplo, los criterios de 
busqueda se pueden preparar en una h'nea vacia de 
la hoja electronica. A siempre es el campo clave, es 
deeir, el campo en el cual se clasifican los datos. 

Practicalc II es una hoja electronica que utiliza 
una facilidad de "etiqueta larga", que permite dis- 
poser texto "a cabalkT de varias celdas. Esta facili- 
dad permite que el programa opere como un proce- 
sador de texto con una iongitud de linea maxima de 
100 carac teres. Esta option dispone de la mayoria 
de las facilidades mas comunes de tratamiento de 
textos, incluyendo desplazamiento de palabras, 
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Transports informatizado 

La mayor fa de las f lotas de camiones en Gran Breta- 
na estan compuestas por unos cinco vehfculos. Pero 
la mayor parte de los paquetes para ordenador dispo- 
nitales para administrarSas estan disenados para una 
cantidad mayor de camiones. El paquete para admi- 
nistration de tlotas MEM Computing, por ejemplo, 
puede manipular flotas de 1 000 o mas vehfculos. 
No es sorprendente que, por este motivo, sean 
pocos los propietarios de flotas pequenas que hayan 
optado por informatizar sus operaciones, tal como 
descubrio Terry Palmer, consejero de transportes 
britanico, cuando ilevd a cabo un estudio de mercado 
patroeinado por el Science and Engineering Research 
Council, A consecuencia del mismo, Palmer se 
abocd a la tarea de crear un sistema que tuviera un 
sentido mas comercial. Aunque comenzd a desarro- 
Ifarlo utiJizando el Lotus 1-2-3, acabo por hacerlo 
caber en la memoria de un Commodore 64 emplean- 
do ei Vizastar. una combination de hoja electronica y 
base de datos prograrnabie* B costo total, segun ha 
cafcubrJo Palmer, ha ascendkio a 1 OOO libras (unas 
200 000 f*as), induyendo software y hardware: alre- 
dedor de la quinta parte del costo totaJ de los srste- 
mas mas grandes. 

La investlgacion la realize Palmer como parte de un 
proyecto que esta llevando a cabo en asociacion con 
el Polytechnic de Central London, para ver si a los 
pequehos camioneros la information que ies propor- 
ciona tal sistema Ies resulta utit y si estarian prepara- 
dos para invertir en la misma, Comenzd con la hoja 
de navegacidn que usan todos los transportistas y 
termino con formularios de informes en los cuales 
los camioneros registran todos fos trabajos efectua- 
dos, sus recorridos, destinos, gastos de viaje, costo 
de combustible, gastos en efectivo y costos operati- 
ves. Al final de cada semana, fos datos de las hojas 
se transfieren a la hoja electronica, 
Al finafizar la entrada de datos, la hoja ya ha calcula- 



do si se han obtenido perdidas o beneficios, y produ- 
ce un analisis completo de la semana comercial. Las 
semanas se pueden consoJidar posteriormente en 
analisis mensuales, y los meses en un total anual. 
Dado que el Vizastar tambien trata una parte de la 
hoja como si fuera una base de datos, la grabacidn 
de registros de disco y su recuperation es exacta- 
mente igual que en los pragramas exclusivos de 
bases de datos (utilizando un campo de clave o posi- 
bilitando la revision de la lista mediante el empleo de 
fas instrucciones Next, Prior o Current, First o Last), 
con lo que se puede llevar un registro permanente de 
clientes. Tambien en la hoja se pueden incluir anota- 
ciones. 



En marcha 




Dado que el Vizastar es una hoja 
electronica programable con 
facilidades para base de datos, 
los usuarios, aun cuartdo no 
posean experiencia alguna, 
pueden configurar el paquete 
para una send I la entrada de 
datos y generation de informes. 
La hoja de navegacion semanal 
de un conductor contiene los 
datos a parti r de los cuales se 
pueden prod weir diversos 
informes y fact uras 
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ckspiazamieoto de bloques. insercion y supresion, 
Tambien se puede cargar una hoja electronica en 
una pane de un docuraeottx La hoja electronica 
segniria escaodo "acma" ( lo que signifies que sus 
formulas, valores u otros cootenidos pueden ser 
modificados en el documenio principal. $in. por su- 
puesto. afectar a la hoja en disco), 

Si bien las iimitaciones de memoria imponen que 
se pueda acceder solo a un par de opciones dentro 
de cualquiera de estos programas, los cuatro pue- 
den acceder a archivos de tratamiento de textos o 
base de datos producidos mediante otros progra- 
mas editados por la misma empresa. For ejemplo, 
el Vizastar puede manipular archivos de tratamien- 
to de textos generados mediante el Vizawriie; el 
Micro Swift puede acceder a archivos de base de 
datos producidos por el Micro Magpie, y el Practi* 
calc y el PS pueden utilizar archivos del Practifile 
de Practicorp. En realidad, puesto que todos utili- 
zan formatos secuericiales, pueden acceder a archi- 
ves mutuos, asi como a program as absolutamente 
dispares, como el procesador de textos Easy script. 
Aunque no puede dedise que esto sea exactamente 
una integracidn completa de software, si nos apro- 
xima mucho a ella, 



Micro Swift: Para el Commodore 64 
Editado par: Audiogenic, P0 Box88 f Reading, 
Berks., Gran Bretana 
Disco 



Practicalc II: Para el Apple II de 48 K, el BBC Micro y 
j el Commodore 64 
ErJrtado por: Practicorp, Goddard Road, Whitehouse 
Ind Est, Ipswich, Suffolk IP1 5NP, Gran Bretana 
Formato: Disco 



PS: Para el Commodore 64 
Editado por: Practicorp, Goddard Road., Whitehouse 
Ind Est, Ipswich, Suffolk 1P1 5NP, Gran Bretana 
Formato: Disco 



Vizastar: Para el Commodore 64 
Editado por: Viza Software, 9 Mansion Row, 
Brompton, Gillingham, Kent ME7 5SE 1 Gran Bretana 
Formato: Disco con cartucho de 4 K 



1373 




Bricolaje/Construccion de un robot 




Control exacto 



Llegados a este punto, estudiaremos el calibrado del robot para 
lograr un preciso control en sus movimientos 



Los motores paso a paso son ideales para el control 
mediante dispositivos digitales, dado que giran un 
intervalo preciso cada vez que reciben un impulso. 
Para establecer una relation entre cl control digital 
del motor paso a paso y el mundo real de distancias 
y angulos, hemos de Uevar a cabo algunos experi- 
ment tos initiates con nuestro robot. Estos nos per- 
mitiran determinar la cantidad de impulsos necesa- 
rios para moverlp a traves de varies angulos y dis- 
tancias. Luego de realizar estos experiments esta- 
remos en condiciones de determinar las relatione^ 
promedio de impulso/distancia e impulso/angulo, 
que deberemos entrar en los programas a modo de 
constantes. En futuros capitulos diserlaremos soft- 
ware que, unido a otras aplicaciones, permitira al 
robot sondear y construir representaciones digitales 
de objetos solidos. Para conseguir que funcione con 
precision nccesitaremos los valores de las relacio- 
nes obtenidas en los experiment os realizados con 
anterioridad en este apartado. 



Calibrado lineal 

Pod ernes hacer una hipotesis de la relation impul- 
so/distancia de nuestro robot valiendonos de la ma- 
tematica elemental. Puesto que un impulso produ- 
ce en los motores un giro de 7,5°, colocar la salida 
del motor en un coeficiente de reduction de 25:2 
significara que un impulso producira un giro de 7,5 
x 2/25 = 0.6° en el eje, Puesto que la rueda Lego 
tiene un radio de 30 mm, el movimiento lineal por 
impulso se puede calcular del siguiente modo: 1 im- 
pulso produce un movimiento de 0,6/360 x 2 x pi 
x 30 mm, Descomponiendo esta expresion encon- 
tramos que 1 impulso produce un movimiento de 
0,1 x pi mm, La inversion de esta cifra nos da un 
coeficiente teorico de impulso/distancia: coeficiente 
i/d=3,lS3. 

El programa de calibrado que ofrecemos a conti- 
nuation le permitira efectuar varias pruebas con su 
robot a traves de diversas distancias. A cada ejeeu- 
ci6n se visualizan en la pantalla la cantidad de im- 
pulsos y las distancias teoricas que se habran reco- 
rrido, Utilizando dos reglas de 30 cm dispuestas 
una a continuation de otra, se puede registrar la 
distancia real recorrida en cada prueba. El progra- 
ma visualiza luego una labia de la cantidad de im- 
pulsos, las distancias reales registradas y los calcu- 
los teoricos. Tambien se calcula un coeficiente i/d 
promedio- Esta cifra es importante, de modo que 
con vie ne apuntarla por se para do. La muestra de 
salida de este programa indica que nuestro robot 
prototipo tiende a reeorrer, para un numero dado 
de impulsos, una distancia ligeramente mayor de lo 
que sugeriria la teoria, La importancia de este ejer- 
cicio radica en que usted halle el coeficiente i/d 
para su robot y lo utilice en futuros programas. 



10 REM CALIBRADO BBC 

20 RDD = SFE62: REGDAT = S FE60 

30 ?RDD=15:REM LINEAS 0-3 SALIDA 

50 adelan6e=4:atras = £:DS M MD(12) 

60 FOR CC=500 TO 1700 STEP 100 

70 ?flEGDAT=0 

80 ?fltG0AT=(?REG0AT OR f) OR adetante 

90 PRW CCJNT[CC*P1).1Q 

100 AS- GETS 

110 FOR M TO CC 

120 PROCimpulso 

130 NEXT I 

140 IN PUT "DISTANCIA MEDIDA EN MM" ;M0((CC- 500^00) 

150 NEXT CC 

160 ?REGDAT=0:T=0 

180 PRINT" IMPULSOS V ME0ID0S', " TE0PJC0S." 

190 PRINT 

200 FOR CC-500 TO 1700 STEP 100 

21 0 PRINT COM D[CC - 50W1 00) . I NT(CC T Pljfl 0 

220 T=T+CC'MD((CC-500}/"l[») 

230 NEXT CC 

240 PRINT: PR INT " COEFICIENTE IMPULSO/DISTANCIA:" ,T/12 

260 END 

270 OEF PROCimpulso 

280 ?REGDAT^(?REGDAT OR 8) 

290 ?REGDAT-(?REGOAT AND 247) 

300 ENDPROC 

10 REM CALfBRAOO CiM 64 ■ — 

20 RD D = 56579: REGOAT =56577 

30 POKE R0D.15:REM UNEAS 0-3 SALlCA 

50 AfM:AT=2:DIM MD(12) 

60 FOR CC=5C0 TO 1700 SUP 100 

70 POKE RE6OAT.0 

SO POKE REGOAT. ( PEEK(fi EGDAT)0R DOR AO 

dO PAINT CC.INTlCC'rJ/10 
100 GET AS:IF AS= - " THEN 100 
110 FOR i=1 TO CC 
120 G0SUB 270:REM IMPULSO 
130 NEXT I 

1 id I N PU r D 1ST AN C IA U EDlDA EM MM"; MD«CC-5C0)/1 DO) 

150 NEXT CC 

160 POKE REGDAT,0:T=0 

170 REM " LINEAS 130-260 IGUALES QUE VERSION BBC " 

175 REM " PERO REEMPLAZAR PI POR - EN LA UNEA 210 " 

270 REM **" Sm IMPULSO 

280 POKE REGDAT, PEEK( REG DATJO R 8 

290 POKE REGOAT, P££K( REG DATJAND 247 

300 RETURN 

Calibrado angular 

Po demos calcular un coeficiente impulso/angulo de 
este modo; si la distancia entre ejes cs de 140 mm, 
la circunferencia del tirculo de giro — lAOxpi. Un 
impulso produce un giro de 360x0,1 x/?i/( 140 x/?f) 
grados y, por tan to, el coeficiente i/a es 3,846, 

Uno de los principals problernas que implica el 
calibrado angular es la medicion exacta de los angu- 
los. Dado que en la mayor parte de las aplicaciones 
el robot girara 90° (o multiplos de 90), nuestro coe- 
ficiente teorico de i/a nos indica que se requeririan 
346 impulsos para un giro en angulo recto. 

Marque en un trozo de papel un par de tineas 
perpendiculares. En una de ellas haga dos peque- 
nas marcas a cada lado del punto donde se intersec- 
tan am has, para design a r los puntos de parti da de 
las rued as del robot. Ejecute el siguiente programa 
para hacer que el robot gire 90°. Ei bucle FOR- 
,,,NEXT de la linea 70 dicta la cantidad de impulsos 
que se le pas an a los motores. La cifra 371 es el 
valor experimental requerido para que nuestro 
robot prototipo gire 90°, Edite el programa, alte- 
rando el timite superior de este bucle, hasta que las 
ruedas de su robot queden alineadas exactamente 
con la otra iinea perpendicular dibujada sobre el 
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nstruccion de 



OBSTACULO 



, I L 



T — T 



' 1,1 '.I' 
r \ I i I I 




CONTADOR , 




PUNTO DE 
PARTIOA 




ZZL 



IMPULSOS MEDIDOS TEORICOS 



500 


160 


157 


600 


195 


188,4 


700 


225 


219,9 


800 


258 


251,3 


900 


293 


282,7 


1000 


324 


214,1 


1100 


352 


345,5 


1200 


390 


376,9 


1300 


421 


408,4 


1400 


452 


439,8 


1500 


488 


471,2 


1600 


522 


502,6 


1700 


553 


534 



COEFICIENTE IMPULSOS DISTANCIA: 3,34767511 



Tahla ieorica 

El programs decalibrado del robot produce esta labia, que se 
debe verificar para asegurar que cada distancra medidaguarde 
una relation razonable con la distancia teorica cor respond sen te, 
Se calcula un coeficsente i/d global como el promedio de los 
coeficie rites de Id obtenidos en las 1 2 pruebas. Este numero se 
debe conservar. porquesera necesarlo en fuiurasprogramas 



Adelante y atras 

El movimiento hacia adelante se efeciua 
estableciendo los bits de direction hacia adelante 
de los activadores del motor paso a paso y 
enviandoles un impuJso a los motores. Se va 
incrementando un contador de impulses y se 
comprueban los bits de sensores del registro de 
datos en busca de una entrada de los sensores de 
colision, Este proceso se repite hasta que se 
detecta una colfsion, momento en el cual se 
invierten los bits de direction del motor y un bucle 
FOR,,, NEXT en via los impulsos necesarios para 
devolver al robot hasta su punto de pallida. El 
movimiento del robot hacia adelante es mas lento y 
ligeramente mas torpe que el de regreso 



papeL Se prrira e&*t**r atras axnprobaciones. 
Pi m 1 ' i la tfctaxjuu ~derecha~ (DE) por "iz- 
qtBerda" {&) en ia tmea 60 y asegurese de que el 
robot tambten gba 9(f en sentido antihorajio. De 
duplicar el valor superior del bucle FOR. ..NEXT, se 
produciria un giro de 18(P\ Com p rue be que las nie- 
das terminan en los mismos puntos en los cuales 
empezaroTL De no ser asi\ es necesario un ligero 
I'Ufte de las rucdas para asegurar que esten situa- 
te simetricamente a cada fade del eje central. 
Cuando este satisfecho con la position de las rue- 
das, marque sus posiciones en el eje y peguclas en 
sitio. 



18 fl£JYI""GIROCBM64""* 
:: r i: = 56579:REGDAT- 56577 

■ E SQD.1 5: REM LINEASQ-3 SALIDA 

« Z=6:DE=0 

=:- = =egdat.o 

: " : " i at ( peek{reg dat)or 1 )or de 

31 FOR 1=1 TO 371 :G0SUB 90:NEXT I 
• : ==£DAT.0:EMD 
W""SF IMPULSQ"" 
■ i -_iZ-r PEEKlREGDAT)GR 8 
~ ~. z -EzKi'REGDAT)ANO 247 



:: =:: L : i::-E}:-'-i^:C 
:: ■=:: = ■: =ev _\e-.e 

m im hi riii ~ 



100 ?REGDAT= < 7REGDAT OR 8) 
110 TREGDAT-^REGOAT AND 247) 
130 ENDPROC 

Ahora que nemos incorporado a nuestro robot sen- 
sores de microinterruptor podemos cscribir softwa- 
re que utilice la salida de la puerta para cl usuario 
para controlar el robot, y la entrada para monitori- 
zar las actividades externas a t raves de los sensores 
del robot. El siguiente y sencillo program a en via al 
robot hacia adelante hasta encontrar un objeto, 
momento en el cual el robot retrocede exactamente 
hasta su position de partida. La logica del progra- 
ms se puede describir del siguiente modo; 

L Establecer el registro de direction de datos en 
15. Con ello se establecen los bits 0—3 como sa- 
lida y los bits 4-7 como entrada. 
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Bricolaje 




2, Establecer la direccion del robot hacia adelante. 

3. Impulsar los motores hasta poner bajo el bit 6 o 
el bit 7, llevando la cuenta de la cantidad de im- 
pulsos efectuados* 

4. Establecer la direccion del robot hacia atras. 

5, Impulsar los motores las veces que indique el 
"contador". 

6* Establecer el reg + de datos en 0 y terminar. 

10 REM * * * * PARACHOQU ES CBM ' " " 
20 RDD=56579:REGDAT«56577 
30 POKE RDD.15:REMLINEAS 0-3 SALIDA 
40 AD=4;AT-? 

50 POKE REGDAT.(PEEK{REGOATTQR 1 KIR AD 
60 REM *'** IMPULSQ AD ELANTE "" 
65 CC=0 

70 G0SUB 1000:CC=CC+1:REM IMPULS0 

80 IF (PEEK(REGDAT)AND 192) =192 THEN 70 

90 REM REGRESAR A PART10A **** 

95 POKE REGDAT r (PEEK{REGDAT)AND 1 )OR AT 
100 FOR 1=1 TO CC 
110 G0SUE 1000:REM IMPULSO 
120 NEXT I 

130 POKE RtGDAT,D:END 



Ajustes preliminares 

Antes de comenzarel prcceso de caliorado es necesario efectuar 
algunos ajustes. Primero, con el robot patas arriba, es 
importante situar correctamente e! eje central sob re el cual girara 
este. Esto se puede nacer mediante las mediciones que se 
indican. Marque el centro del eje con un pequerlo rasgufio o con 
un rotulador indeieble. Mida la distancia entre las caras interiors 
de las rued as (debe estar entre 140 y 1 50 mm). Es importante, 
para que el robot pivctecorrectamente, que cada rue da sea 
equidistance respecto ai punto central del eje que hemos 
marcado. Deslice suave me nte las rue das a lo largo de sus ejes 
hasta logrario 




DISTANCIA ENTRE EJES: 140-150 mm 
4 !> 



1000 REM ""S/R IMPULSO "" 
1010 POKE REGDAT,(PEEKfREGDAT)OR fl) 
1020 POKE REGDAT,{PEEK(REGDAT) AND 247) 
1030 RETURN 

10 REM PARACH0QUES BBC **** 

20 RDD&FE62:REGDAT=£FE60 

30 ?RDD=15:REM UNEAS 0-3 SALIDA 

40 addanta-4:atfa$«=2 
50 *RE6DAT= [7REGDAT OR 1} OR adelante 
60 REM **"* IMPULSO ADELANTE ™ 
65 comador=0 

70 REPEAT:PR0Cimpu lso:conlador = con!ador+ 1 
80 UNTIL (7REGDAT AND 192)<>192 
90 REM * * ' * RE6RESAR A PARTI DA " * 
95 ?REG0AT=(7REGDAT AND 110R atras 

loo for I— i to contador 

110 PRGCimpuiso 
120 NEXT I 

130 ?REGDAT=0:END 
1000 DEFPROCimputeO 
1010 ?REGDAT=(?REGDAT OR 8) 
1020 ?REGDAT=(7flEGDATAND247) 
1030 ENDPROC 

En este programa hemos designado al par de inte- 
rrupt ores hacia adelante como el par que esta mas 
alejado de los conectores de parche de la tapa del 
robot, y hemos conectado estos dos microinterrup- 
tores a los bits 6 y 7, utiiizando dos cables entre los 
dos pares de conectores situados mas a la derecha 
de la tapa, el rojo y el azul. En el futuro daremos 
siempre por sentado que el enchufe D esta aun mas 
adelante que el sistema de conectores de parche. Si 
al ejecutar este programa se encuentra con que su 
robot avanza primero hacia atras (de acuerdo a esta 
convention), quite la tapa y dele la vuelta. 

De los cuatro bits bajos del registro de datos que 
controlan la operation del motor, el bit 0 es el bit 
reposo (establecido normalmente en uno), los bits 
2 y 3 son los controladores de direccion para los 
motores derecho e izquierdo > y el bit 3 impulsa si- 
multaneamente am bos motores, haciendolos girar 
un paso cada vez que el bit 3 sufre una transition de 
bajo a alto. El empleo de los ope rad ores logicos 
AND y OR permite encender y apagar bits individua- 
les sin afectar a los otros bits del registro. Dado que 
los cuatro bits superiores han si do establecidos 
como entradas por el registro de direccion de datos, 
se suelen mantener altos. Cuando un microinte- 
rruptor se cierra, el bit correspondiente del registro 
de datos pasa a bajo, Normalmente, los bits 6 y 1\ si 
estuvieran establecidos para entrada, tendnan el 
valor 192 (128-h64). El bucle repetitivo que envia el 
robot hacia adelante en las line as 70-80, termina 
con la condici6n de que estos dos bits ya no pose an 
un valor de 192. Esto puede suceder si se cierra un 
microi n tc rrupt o r (o ambos), Si se lleva un contador 
dc la cantidad de impulses envia dos a los motores 
en el penodo inter medio, entonces el robot puede 
retroceder exactamente hasta su punto de partida 
mediante la alteration de los bits de direccion del 
motor e impulsando a los motores la cantidad apro- 
piada dc veces. El paso de 7,5° de los motores se 
traduce en un movimiento de menos de I mm para 
la rueda; en consecuencia, po demos controlar muy 
facilmente la position del robot. 

Por ultimo, es interesante destacar que el robot 
se mueve hacia adelante mas despacio que cuando 
se mueve hacia atras. Aqui nos vemos limitados 
por la veloeidad del basic, El tiempo entre impul- 
sos en el bucle que envia at robot hacia adelante es 
mayor que el que lo hace retroceder, porque en el 
primer bucle sc ha de llevar a cabo un trabajo adi- 
cional, como llevar el contador y com pro bar la coli- 
sion, lo que no sucede en el segundo bucle, 

Ahora haremos un alto en el proyecto del robot 
para darle tiempo para completar el ensamblaje. 
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Finalizamos nuestra introduccion al sistema operativo del BBC 
concentrandonos en la utilization de vectores y examinando la 
interaction con el ordenador mediante el teclado y la unidad de 
representacion visual (VDU) 



Se dice que la mayoria de las rutinas del OS del 
BBC estin vectorizadas* El OS, cuando se le ins- 
truye para que llame a la rutina OSCLI, lo primero 
que hace es Uamar a una rutina en la direction 
SFFF7, Es esta la rutina que llama a su vez a la 
OSCLI, pero no direct amente si no que halla la direc- 
cion donde se encuentra la OSCLI por medio del 
contenido de dos bytes de memoria que se encuen- 
tran en la pagina 2 de la RAM. Estos dos bytes son 
laoiados veaor. el byte inferior de la direccion en 
cuesrion se encuentra en el byte de inferior nume- 
ration de dicho vector, y el byte superior de la di- 
rection se halla en el byte de numeration superior, 
Asi, para OSCLI, que se vectoriza mediante las posi- 
ciones $208 y $209, el byte inferior de su direccion 
se halla en la position $208 y el superior en la $209, 
Esta es la conocida convention de direetionarnien- 
to lo-hi que siguen para su almaccnamiento en me- 
moria todas las maquinas 6502. Las direcciones 
contenidas en cada vector son establecidas por el 
OS cuando se reinicializa la maquina. ^Cual es la 
justification de esta alambicada manera de llamar a 
una rutina del OS? Desde luego no reside en que 
Acorn este decidida a hacer la vida del progra ma- 
dor lo mas complicada posible. Todo lo contrario, 
el proceso esta pensado para facilitarsela. ^Es esto 
verdad? 

Habra notado que todas las rutinas del OS del 
BBC mencionadas hasta ahora son 11 am ad as a una 
direccion contenida en el intervalo SFF00 a $FFFF. 
No es casual, Una vez llamada esta direcci6n, se 
eorxa eti una rutina que ocasiona el salto a la direc- 
tion contenida en el vector para esa determinada 
rutina del OS. como tuvimos ocasion de ver con las 
llamadas a CU v a 03CLL Ahora bien, la direccion 
que Uamamos entre SFFQO y SFFFF es la misma en 
todas las versiones del OS del BBC y asi continuara 
siendo, Si es necesario cambiar los programas inier- 
nos de la ROM de OS, los diseriadores del OS no 
tienen mas que asegurarse de que las direcciones de 
las rutinas ROM colocadas en las posiciones del 
vector han sido alteradas teniendo en cuenta el 
cambio. Asi queda protegido el usuario de tales 
cambios en el OS siempre que las rutinas del OS 
sean llamadas en sus puntos correctos de entrada. 
EI contenido, pues, de un vector puede diferir de 
una version a otra, pero el usuario no tendra noticia 
de ello siempre que use las direcciones del pun to de 
entrada en el intervalo SFF00 a SFFF. 

Una segunda ventaja del empleo dc vectores es 
que el metodo nos brinda un medio de modificar el 
comportamiento de las rutinas del OS- Basta con 
alterar el contenido de un vector de modo que 
apunte a una rutina en codigo maquina disenada 
por nosotros mismos, interceptando asi las llama- 



das normales del OS. Mas adelante examinaremos 
los vectores empleados en las principales rutinas 
del sistema operativo. 

De momento, cons idem re mos el vector llamado 
USERV, al que apuntan las posiciones $200 y $201 
Se trata de un vector bastante especial, ya que por 
lo general no hace nada. Se emplea con dos ordc- 
nes *, las "CODE y "LINE. Digitelas y se encontrara 
con el mensaje de error Bad^Command. Pero antes 
de enviar una carta de que] a por este nuevo error 
del OS del BBC lea lo que sigue, 

USERV nos permite definir la funtion realizada 
con las instrucciones "CODE y 'LINE, o sea, instruc- 
ciones definidas por el usuario. "CODE es una mane- 
ra util de pasar parametros a programas en codigo 
maquina, como se indica en la tabla siguiente: 



Registro 


*C0DE ift 


*UNE cadena texto 


A 


0 


1 


X 


Contiene el valor del 
primer parametro 
despuesde *C0DE. El 
parametro debe estar 
entre Oy 255 


Contiene el byte inferior de 
la dir. de memoria donde 
se puede hallarei primer 
car, de la cadena despues 
de *LINE 


Y 


Contiene el valor del 
segundo parametro 
despues de *C0DE. 
Otravez, debe estar 
entre 0 y 255 


Contiene el byte superior 
de la dir. de memoria 
donde se encuentra el 
primer car. de la cadena 
despuesde *LINE 



Esta tabla muestra el estado de los tres registros de 
la CPU al entrar en la rutina a la que apunta el 
contenido de USERV. Se tiene un 0 o bien un 1 en A, 
para indjear cual de las dos instrucciones provoco la 
entrada a USERV. Los valores contenidos en X e Y 
dependen de la instruction usada, *C0DE o "LINE. 
Por ejemplo, * CODE 3,2 entrara a la rutina que indi- 
que USERV con un 0 en A, un 3 en X y un 2 en Y. Es 
claro que la rutina senalada por la direccion conte- 
nida en USERV sera la rutina a la que deseamos 
pasar los dos parametros. 

El programa que proporcionamos en la pagina 
siguiente i lustra un sencillo uso de la instruccion 
*C0DE. La rutina en codigo maquina se ensambla 
en la memoria empezando en la direccion SC00 
como resultado dc la sentencia de asignacion de la 
Ifnea 40: la variable enter a P% se asocia al contador 
dc programa del procesador, al igual que haccn A° : 
con A, X% con X e Y% con V, los registros del proce- 
sador, Se activa USERV para que apunte a la rutina 
colocando el byte inferior de esta direccion, S00. en 
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21* 

23* 
1-8 



258 



zee 

2*6 



" = : :e* " d3S 
. 2 : _ SEnVj 

- : .39 

.i-- -1286 

H =5 TO 2 

3PT |^ 

BNE not code 

. oop 
_SR &FFE3 

DEY 

2PY *0 
BNE 1 oop 
RTS 

. notcode 

3: NEXT YA 

FOR rep-1 to 10 
FOR asc=33 TO 48 
a5C*=STR*^«c) 
rep*=STR*Crcp> 
code*-" *CQDE 

+asct+ " , " +rep* 
$C=codefc 
XX- C MOD 256 
Y^=C DIU 256 
CALL &FFF7 
NEXT; NEXT 



la posicion S200, y el byte superior, $QC, en la $201 . 
La rutina visualiza en la pantalla un dctermmado 
numero de caracteres; el primer parametro de la 
instruction *C0DE contiene el codigo ASCII del ca- 
racter y el segundo parametro corresponde al nu- 
mero de veces que el caracter sera visualizado en la 
pantalla, _ nnr 

*LINE no es de tan amplia utilidad como LUUt, 
pero si se desea emplearla se pueden aplicar los 
principios ilustrados en el siguiente programa, 
siempre que no se olvide entrar al programa con un 
1 en el rcgistro A y que los registros X e Y han de 
apuntar a la cadena de texto en memoria. Esa la 
funcion principal de "LINE: pasar cadenas de texto a 
los programas en codigo maquina. En aquellos 
casos en que no hay muchos parametros que pasar 
a la rutina, estas dos llamadas son el mode mas ele- 
gante de haeerlo. 

La linea 20 del programa activa USERV para que 
apunte a nuestra rutina en codigo maquina. El 
buck de la Ifnca 90 a la 120 imprime Y veces el 
caracter cuvo codigo ASCII contiene el registro A, 
Si se entra a la rutina por medio de la instruccion 
*L1NE, las lineas 60 y 70 se encargan de detectar el 
hecho y dc abandonar la rutina. Las tineas de la 200 
a la 250 generan la instruccion *C00E con los para- 
metros variables, 

Interaccibn del usuario 

Los principales metodos de dialogo con el microor- 
denador son el teclado y la pantalla de television o 
VDU (Visual Display Unit: unidad de represents- 
don visual), Vamos a seguir investigando en detatle 
como el sistema operativo del BBC nos permite la 
interaceion con estas dos areas fundamentals del 
ordenador, 

Comencemos examinando la llamada Oh que 
nos permite leer caracteres desde la corriente de 
entrada seleecionada en un momento dado. Esta 
rutina, denominada 0SRDCH {OS read character. 
lectura de caracteres), es llamada en la direccion 
SFFEQ y se vectoriza a traves de las posiaones S21U y 
£211. Dado que acepta caracteres uno a uno desde 
la corriente de entrada seleecionada, vamos a ver 
como se selecciona dicha corriente. Existen dos 
maneras principales: el teclado y la errtrack 
Se seleccionan por medio de una llamada UotJY I b o 
bien *FX. El cuadro siguiente resume esta instruc- 
cion en codigo maquina y en basic: 



Selection de la corriente de entrada 



n 


Teclado 


RS423 


Ensambiador 


BASIC 


0 


V 


X 


LDA # 2 


*FX2,n 


1 


X 


V 


LDX # n 




2 






JSR SFFF4 





Por tanto, *FX2,1 desconecta ei teclado y conecta la 
RS435 como corriente de entrada, Los datos recibi- 
dos en la RS423 seran tratados como si hubieran 
sido digitados. En ensambiador, n debe tener valor 
1 si se desea obtener el mismo efecto, 

Una vez seleecionada la entrada, se puede acce- 
der a esa corriente por medio de 0SRDCH. Lo pri- 
me ro que hay que decir sobre esta rutina es que su 



utilidad real se demuestra solo en programas en en- 
sambiador, puesto que el basic ya tiene rutinas si- 
milarcs con GET e INPUT. Esta rutina debe ser lla- 
mada en la direccion SFFEO y, a la vuelta de la lla- 
mada, el caracter leido de la corriente estara conte- 
nido en el registro A; si se detectara cualquier error 
durante la lectura, el flag de arrastre se pondra a 1, 
en easo contrario vendra a 0. Asi, C=1 a la vuelta 
de la rutina OSRDCH indica que el caracter contem- 
do en A no es valido por cualquier motivo. Cuando 
la lectura es desde el teclado, el error suele ser de- 
bido a la pulsation de la tecla Escape- Esto hace 
que C se ponga a 1 y el valor contenido en A sea 27 
(Escape en ASCII)" Si usted se da cuenta de la si- 
tuation debera actuar en conformidad y con todo 
cuidado: el OS del BBC esta esperando que el pro- 
grama le indique que ha recibido este error Escape. 

Esto lo haremos empleando una llamada a 0SBY- 
TE con A- 126, cuvo efecto sera el de que se limpien 
varias partes de la zona de trabajo del OS, Esta 
operacion de respuesta al Escape se hace habitual- 
mente de forma automatica por el interprete basic 
si se pulsa la tecla Escape durante una operacion de 
entrada, La rutina que sigue, muy sencilla, lee la 
corriente actual de entrada y actua dependiendo de 
una posible detection de error de Escape. 

1000 .input JSR &FFE0 
1010 BCS error 

1020 RTS 
1030 .error CMP#27 
1040 BNE out 

1050 LDA#126 
1060 JSR&FFF4 
1070 .out RTS 
La linea 1000 llama a la rutina OSRDCH y la 1010 
comprueba el estado del Hag de arrastre. Si esta a 
cero, entonces se ejecuta una RTS al programa de 
llamada, con un caracter valido en el registro A. Si 
no es asi, la linea 1030 comprueba si el error me 
debido a Escape, y, en caso afirmativo, las lineas 
1050 y 1060 ejecutan la llamada a 0SBYTE que se 
encargara de acusar la recepcion del evento Esca- 
pe. Puede que usted piense que para entrar cade- 
nas de datos en sus programas en codigo maquina 
debera emplear una rutina de fabrieacion propia, 
pero no es as!. Existe en el OS un medio de leer 
cadenas de caracteres desde la corriente actual de 
entrada. A esta rutina se accede por medio de una 
de las llamadas a OSWORD, que habremos de exa- 
minar mas adelante en este curso. No otetante, 
usaremos ahora esta llamada particular de UbWUKU 
para leer cadenas de caracteres. 

El bloque de control 

Las rutinas OSWORD son llamadas en la direccion 
SFFF1 . Existen varias, y para especificar cual necesi- 
tamos nos servimos del valor contenido en A en el 
momento de hacer la llamada. En todas las llama- 
das a OSWORD, los registros X e Y del 6502 apuntan 
a un bloque de memoria llamado bloque de control. 
que contiene los parametros que se pasan a la ruti- 
na, El registro X contiene el byte inferior de la di- 
reccion del bloque de control y el registro Y contie- 
ne el superior, segun la norma seguida por el 6502 
del lo-hi. 

La manera en que se inicializa el bloque de con- 
trol es la siguiente: 
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El bloque de control de OSWORD 


Entrada al 
bloque control 


Funcion 


0 


Byte inferior de la direction en la que 
van a ser escritos los caraeteres 


1 


Byte superior de la direccion en la 
que van a ser escritos los caraeteres 


2 


Longitud maxima de la linea 


3 


Codigo ASCII mmimo aceptable 


4 


Codigo ASCII maximo aceptable 



Durante la introduction de los caraeteres per 
medio de est a rutina, la tecla Delete tiene su fun- 
cion habitual. La rutina puede ser cancelada con 
solo pulsar Return o Escape. Por ejemplo, el blo- 
que de control que sigue a continuation tiene estos 
efectos cuando se hace una llamada a OSWORD: 



Ejeapio de bloque de control de QSWQRD 


Entrada al 
bloque de control 


Valor 


0 
1 
2 
3 
4 


&00 
&0C 
&07 
32 
96 



L El primer caracter entrado sera almacenado en 
$C00, el segundo en SC01 1 etc. 
2* Sotamente se aceptaran siete caraeteres; si in- 
terna digitar algun caracter mas, entonces se gene- 
ra ra un pitido y to do lo que escriba sera ignorado. 
3. Solamcnte sc aceptaran codigos ASCII que 
vayan desde el 32 a I 96 (desde el caracter Espacio al 
caracter f); los demas seran ignorados, 

Como puede ver, la llamada nos permite descartar 
caraeteres no deseados a la hora de su entrada, 
Cuando se ha producido la salida de la rutina. el 
estado del flag C nos mforma de la causa del final 
de rutina. Si C=1 . es que se pulso Escape. Si C=0, 
es que Return se eucargo de fmalizar la entrada de 
caraeteres y el registro Y reriene la longitud de la 
cadena entrada. incluyendo el valor de retomo de 
carro en ASCII como final de la cadena. Recuerde 
que puede servirse de esta rutina en eualquiera de 
las cornentes de entrada seleccionadas por medio 
de *FX2 o su equivalente en codigo maquina. 

Acabamos de ver lo facil que es una lectura de 
datos en el BBC Micro. Avancemos un poco mas 
examinando los medios de enviar los caraeteres a la 
corriente de salida seleccionada. De nuevo habre- 
mos de em pi ear una llamada del OS para seleccio- 
nar la corriente de salida que deseamos usar. Se 
consigue con *FX3 s n, donee n e specif ica la corriente 
que se selection a* Cada bit del parametro n contro- 
la una corriente diferente. Por ejemplo, *FX3,1 per- 
mite las salidas seriales, dc pantalla o de impresora 
v permite una satida SPOOL, siempre que hay a si do 
senerada una instruction * SPOOL. 

La principal rutina empleada para enviar caracte- 



Tabla do parametros de control corriente salida 





0 


1 


2 


3 


4 


6 


1 


RS423 
ON 


Pantalla 
OFF 


Impresora 
OFF 


Impresora 
ON* 


Spool 
OFF 


Impresora 
OFF** 


0 


OFF 


ON 


ON 


OFF* 


ON 


ON** 



Impresora en ON u OFF, este o no desactivada por otra causa 
Impresora en OFF a menos que el caracter no sea precedido por CHR$(1) 



res a la corriente seleccionada de salida se llama 
OSWRCH (WRtft- Character: escritura) y es llamada 
en la direccion SFFEE, vectorizada por medio de las 
posiciones $20E y $20F. Su empleo es sencillo; basta 
con cargar el registro A con el codigo ASCII del 
caracter que se desea escribir y llamar despues la 
rutina. Las siguienfes tres rutinas imprimen el ca- 
racter A en pantalla: 

1000 VDU 65 

1000 PRINT CHRS(65) 

1000 LDA-55 

1010 JSfi 

La orden VDU del basic produce en esencia los mis- 
mos efectos que OSWRCH. Los caraeteres del inter- 
vale ASCII 32 a 255 se %isuaJizan en pantalla. salvo 
el 127, que es el caracter Delete. Los incluidos en el 
intervalo del 0 al 31 tienen funciones especialcs. 
Ellos son los que nos permiten emplear OSWRCH 
para dibujar graficos en pantalla, ejecutar las ins- 
truccion es COLOUR y GC0L definir caraeteres y con- 
trolar el chip 6845, que cs cl que controla la visuali- 
zation video del BBC Micro. 

La escritura de caraeteres en pantalla o sobre 
otro soporte cualquiera a traves de la rutina 
OSWRCH cs conocida a menu do como escritura 
sobre drivers (mane j adores) dc VDU. La tabla de 
codigos de control ASCII ilustra los efectos dc los 
codigos de caracter entre el t) y el 31 cuando son 
enviados a drivers o unidades VDU, Notara que 
estos nos permiten hacer, por medio de rutinas de 
graficos en codigo maquina. to do lo que pod e mos 
hacer en basic. 

Graficos via la OSWRCH 

Las rutinas OSWRCH nos ofrecen toda la posibilidad 
de graficos que obte nemos con instrucciones para 
graficos. El programa que servira de segundo ejem- 
plo, escrito al margen de la pagina siguiente, nos 
dibujar a en pantalla una linea roja. Las lmeas de la 
50 a la 75 ejecutan una instruccion GC0L 0,1 esta- 
bleciendo el color rojo de la linea. Las line as dc la 
90 a la 150 ejecutan una instruccion PLOT 5 3 100,1 00 
que cquivale a la orden DRAW 100,100. La linea 100 
en via el tipo PLOT (el 5, en este caso) a los drivers 
de VDU, seguido de una abscisa de dos bytes, con 
el byte inferior primero, y una orden ada dc dos 
bytes, igualmente con el byte inferior primero. Se 
puede ejecutar una instruccion MOVE sustituyendo 
el 5 por cl 4 (pues MOVE no es mas que una mstruc- 
ci6n PLOT 4,X > y). Otras operaciones graficas (como 
la instruccion PLOT 85 para dibujar triangulos) se 
pueden obtener por los mismos medios. Pero es im- 
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60 

65 



Graficos via OSWRCH 

18 MODE 1 

20 FOR IX=0TO2STEP2 

40 [ OPT VA 
50 LDA tt!8 
55 JSR &FFEE 
LDA m 
JSR &FFEE 
7@ LDA #1 
75 JSR &FFEE 
80 

?0 LDA #25 
95 JSR & F ~ E E 
100 LDA #5 
105 JSR &FFEE 
U0 LDA #8 
115 JSR &FFEE 
120 LDA #100 
125 JSR &FFEE 
130 LDA #6 
135 JSR &FFEE 
140 LDA #100 
145 JSR &FFEE 
150 RTS 
160 ] :NEXT IX 
170 CALL 9 



portante recordar que, en el envfo de instrucriones 
PLOT a los drivers VDU, estos esperan recibir cinco 
bytes despues de ser enviado el valor 25 como pri- 
mer byte; si estos bytes no Ilegan a recibirse, pue- 
den ocurrir efectos extrarlos. Esto es valido para 
toda operation sobre drivers de VDU que exija el 
envfo de mils dc un byte. 

El VDU23 es otra instruction util. Se emplea para 
definir caracteres generados por el usuario. Por 
ejemplo, VDU23 ! 224,255 5 255 F 255,255 ) 255 H 255 1 255 ! 
255 defmira el caracter 224 (por lo general no defi- 
nido) como un bloque compacto, Los caracteres 
comprendidos entre los numeros 244 y 255 en los 
modos de 0 a 6 pueden redefinirse por el usuario 
con esta instruccion. De hecho, la instruccion 
VDU23 en conjuncion con una de las llamadas OS- 
BYTE permite al usuario redefinir otros caracteres 
en el juego de caracteres, 

Toda Ilamada VDU23 no reconocida por el OS (p. 
ej,, VDU23,0...) es pasada por un vector especial 
situado on $226 y $227. Si se cambia la direction 
con ten id a en este vector, pueden anadirse rut in as 
propias con la instruccion VDU23. 

Un uso mas avanzado de la instruccion VDU23 es 
el de permitir al programador acceder al chip de 
control de video 6845, Las instrucciones VDU23 
toman la forma: 

VDU23 J 0 J registro,valor J 0 5 0 f 0 J 0 J 0 ) 0 

aqui registra es el registro 6845 al que deseamos es- 
cribir, y valor es el valor que se escribira en el 6845. 
Un cjemplo del uso de VDU23 cn este sentido es la 
alteracidn de dos registros del 6845 en el programa 
que sigue: dicen al chip cual es el area de la memo- 
ria del ordenador que ha de servir de memoria de 
video. El programa cambia el initio de la RAM de 
video por la direccion $0000. Lo cual muestra la 
zona de trabajo del OS del BBC sobre la pant alia y 
pueden verse efectos intcresantes, Trate de anadir 
unas cuantas lineas de eodigo, de dimensionar algu- 
nas matrices, etc. La rutina esta escrita en basic 
pero se puede convertir facilmente en ensam- 
blador: 

10 IVIODE 0 

20 VDU23,0J2,0\0,0,u\0A0 

30 VDU23 ! 0 l 13 ? 0,0 l 0 ? 0 l 0 5 0 f 0 

40 VDU28 P 0,10 r 30,0:REM establece ventana texto 

50 CLS 

Hay otras dos Hamadas del OS relacionadas con 
OSWRCH. A saber: QSNEWL y OSASCIL La primera, 
si es Ilamada en $FFE7, escribe un salto de linea y un 
re tor no de carro en pantalla. OSASCIl, Ilamada en 
$FFE3, es una variante en OSWRCH, y resulta titil en 
tratamiento de textos. Cuando se escribe un carac- 
ter 13 por medio de esta Ilamada, el caracter 10 o 
salto de linea se escribe en la pantalla de salida. No 
deberd, por tanto, ser us ad a cuando se estan escri- 
biendo instrucciones de graficos a los drivers de 
VDU, ya que puede generarse un CHRS(10) adicio- 
nal y provocar confusiones, 

Finalmente * SPOOL y "EXEC son dos instruccio- 
nes que permiten salidas y en trad as al si sterna de 
archives seleccionado, *EXEC nombrearchivo abrira 
el archivo cuyo n ombre se especifique, si existe, 
leyendo su contenido como si se tratara de un tecla- 
do. * SPOOL escribe caracteres al archivo que se cita 



en la instruccidn, como si tales caracteres fueran 
escritos a la corriente de salida. 

Con lo anterior damos por concluida la introduc- 
tion al sistema operativo del BBC Micro. En los 
capitulos venideros nos detendremos en el estudio 
dc las rutinas que mejoran la salida en pantalla del 
Commodore 64, antes de adentrarnos en una am- 
plia exposition de diversos sistemas operativos. 

Tabla cod. de control ASCII 



Crjdigo 


Bytes adicionales 
requeridos 


Description 


0 


0 


No hade nad a 


[ vr 


1 


Envfa el primer caracter a la impresara solo 


2 


0 


Activa (a impresora 


3 


0 


Desactiva la impresora 


A 


0 


Escribe texto al cursor de texto 




0 


■ Escribe Sexto al cursor oratico 


6 


0 


Permite que Iqs drivers de VDU escriban caracteres a 
la corriente de salida 


7 


0 


Genera on breve soni do 


8 


0 


Mueve t\ cursor un espacio a la iiquierda 


9 


0 


Ml eve el cursor un espacio a la derecha 


10 


0 


Mueve el cursor un espacio hacia abajo 


11 


0 


Mueve el cursor un espacio hacia arriba 


12 


D 


Limpia el area de texto de la panialla 


13 


0 


Deuuelve el cursor al inlcio de la linea aclual 


14 


0 


Activa eJ modo paginado 


15 


0 


Desactiva el modo paginado 


16 


0 


Limpia el area de gralicos de la pantalla 


17 


1 


Establece el color de texto en el color cuyo eodigo es 
el bylesiguiente 


18 


2 


Kace un 6 COL con los dos bytes siguienies que se 
han de enviar a los drivers. Asi, el enviode 18 h 0.3 
ejecutara la orden GCOL0.3 


19 


5 


Define los cole res lOgicos. Ver manual 


20 


0 


Devuelve ins oolores Jogicos a los vale res por defecto 


21 


0 


Ho permite que los drivers de VDUescriban 
caracteres a la corriente da salida 


22 


1 


Rone el modo de pantalla en el modo de! byte 
siguiente. El envfo de 22 y 7 dad Modo 7. La HI MEM 
no se altera 


23 


9 


Envia instrucciones al chip 6£45: programa 
caracteres definidos por el usuario 


24 


8 


Deline una ventana de gralicos 


25 


5 


Realiza la Instruccidn PLOT 


26 


0 


Establece una ventana de texto y grilicos por defecto 


27 


0 


Win gun efecto 


£S 


4 


Establ ece una ventana de texio 


29 


4 


Estabiece el origen de gralicos 


30 


0 


Lleva el cursor de texto al enguEo superior iiquierdo 


31 


2 


Pone el cursor de texto en la position ^/en los dos 
bytes siguientes Asi, el envio de 31 A 0,10 pondra el 
cursor en la posici6n 10,1 0 de la pantaila 
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Intercambio 
telefonico 



Iniciamos una serie en que analizaremos en detalte las 
aplicaciones practicas de las comunicaciones mediante modems 



i 




La cooexkn a un modem le permite a su micro 
"hablar" con otros ordenadores a Traves del telefo- 
no. De este modo, se abre ante listed una amplia 
gama de actividades relacioriadas con la comunica- 
rion: enviar cartas que se reciben en el instante en 
que se transmiten, intercambiar software con ami- 
gosque vivan en lugares ale j ados, pasarse mensajes 
coo otros usuarios o ganar acceso a un ordenador 
central. En un future articulo analizaremos est as 
.iciones. Aqui vamos a echar una mirada a los 
principios en los cuales se sustenta la transmision 
de datos entre ordenadores. 

La tecnologia de las comunicaciones (tambien 
: . r. xida como corns) tiene sus ongenes en la infor- 
niaaca de ordenadores centrales. En el pasado se 
soMa situar el ordenador central en una habitation 
coostruida expresamente y dotada de aire acondi- 
dooado, y desde alii se efectuaban conexiones con 
~i— * :\.-.\t> iismbuidos per todo el edificio. Un ter- 



minal constaba tan solo de una pantalla y un tecla- 
do conectados al ordenador principal a traves de un 
cable en serie, De este modo un usuario que estaba 
sentado en un extremo del edificio podia acceder al 
ordenador del otro extremo. 

El enlace en serie di recto entre el ordenador y el 
terminal funciona correctamente entre distancias 
relativamente pequenas, es deck, de unos pocos 
centenares de metros; pero la perdida de definition 
de las senales hace imposible la transmision a traves 
de distancias may ores, aun cuando el costo del ca- 
ble ado no represente obstaculo alguno* Este es el 
motivo por el cual se desarrollo el modern, 

Un modem (de "raodul ad or Idem odu I ador " ) es 
un dispositivo que permite que los datos del orde- 
nador se transmitan a traves de una line a telefonica 
normal. Funciona convirtiendo las senales electri- 
cas del ordenador en to no s de audio de frecuencia y 
volumen aptos para la transmision a traves de la 



Tono de insiruccidn 

Desarrolledo originalmente para 
conectar terminales remotes a 
ordenadores centrales, el 
modem 

( ' ' mod u I ad o it demo d u lado r' ' > 
convierte, o modula, datos 
electronicos digitales en 
tones de audio para 
transmisiones 
telefonicas, y 
demodula los tonos de 
audio para volver a 
convertirlos an senales 
digitales en el memento 
de su reception. Los 
acopladores acusticos 
transmiten y reciben a traves 
del tubo del telefono, mientras 
que los modems "ccmpactos 1 ' 
se conectan directamente a la 
linea, por lo general a traves 
de un conector de ampliation 
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icaciones 



red telefonica, Este proceso es lo que se conoce 
como modulation. El modem del ordenador recep- 
tor vuelve a convertir estos tonos de audio en sena- 
tes electricas que se le puedan pasar al ordenador 
receptor (lo que se denomina demodulation). Se 
utiliza una serial constants (llamada tono de porta- 
dora) a modo de referencia, mientras se transmiten 
los datos en la onda modulada, 

El resultado concrete de este proceso es que se 
puede acceder a ordenadores remotos casi como si 
estuvieran conectados directamente al terminal 
Los terminates exclusivos por lo general estan for- 
mados por una VDU y un teclado y. puesto que no 
poseen capacidad de proceso propia. se les suele 
calificar como "terminates tontos". Se puede em- 
plear un micro ordenador como si fuera un termi- 
nal, simplemente utilizando un software de comu- 
nicaciones apropiado. Sin embargo, dado que un 
micro si posee capacidad de proceso propia, se dice 
que en este caso es un "terminal inteligente \ 



Tipos de modem 



Existen dos tipos de modems: acusticos y compac- 
tos. Los modems actisticos (llamados por lo general 
acopladores acusticos) poseen dos tazas de goma en 
las cuales se coloca el tubo del telefono. Los soni- 
dos de audio se transmiten a traves de la bocina y se 
reciben por el auricular. Los modems acusticos son 
los mas convenientes de los dos tipos, porque se los 
puede utilizar con cualquier telefono, ;y los que 
funcionan a pilas se pueden incluso emplear con or- 
denadores portables para efectuar llamadas desde 
teiefonos publicos! Por otra parte, los modems 
acusticos estan sujetos a la interferencia del ruido 



cireundante y t por lo tanto, no son muy fiables. 

Los modems compactos o de ^conexion directa" 
se enchufan directamente en un enchufe estandar 
de telefono y el telefono se conecta en la unidad del 
modem. Ademas de ser mas fiables que sus equiva- 
lentes acusticos, los modems compactos por lo ge- 
neral ofrecen mas caracteristicas. 

Debido a que los modems compactos se enchu- 
fan directamente en la red telefonica, estos ban de 
haber sido homologados por la Compania Telefoni- 
ca Nacional de Espana (C.T.N. E.); esto asegura 
que no exista ninguna posibilidad de que se permita 
el pa so de voltajes de la red electrica al sistema te- 
lefonico. y verifica que el modem se desconecte 
"limpiamente 7 ' al final de una llamada y no deje la 
iinea "ocupada \ El empleo de un modem no ho- 
mologado es ilegaL 

Entre las utiles caracteristicas adicionales que 
ofrecen algunos modems se incluyen las de "res- 
pucsta automatica" y ^llamada automatical (esta 
ultima, todavia no implementada por la C.T.N.E.). 
Los modems con respuesta automatica, al contestar 
al telefono y detectar otro modem al otro extremo 
del hilo, le pasan el control al ordenador. Si la lla- 
mada no es de otro modem, el modem con respues- 
ta automatica simplemente cuelga, Los modems 
con llamada automatica pueden aceptar un numero 
desde el ordenador y "marcarlo 5 ' automaticamente, 
Por lo tanto, en respuesta a un nombre que entre el 
usuario, el software del ordenador puede buscar el 
numero de telefono en una base de datos y despues 
indicarle al modem que marque ese numero, 

El baudio es la unidad de medida de la velocidad 
de transmision de datos entre dos dispositivos. Nor- 
maknente se la considera como la cantidad de bits 



El tren del pensamiento 

AAAAA AAAAA 



"A" ASCII = 65 



BIT DE BIT DE 
PAR1DAD FINAL 



UNO _ 



CERO 



1 



Un bit de paridad 

Los datos se t ran smiten por la lin ea telefo ni ca rep res entando el ' 
cocfigo ASCH binario de cada caracter como un flujo de tonos 
audibles. La frecuencia del tono 0 binario estel justo por debajo 
del tono de referencia o "portadora" , mientras que el 1 binario 
posee una frecuencia de tono justo por encima de la misma. Para 
la deteccfon de errores se pueden generar tonos extras (llamados 
bits de "final" y de "paridad"): aqui el caracter trans mitido es la 



"A" , ASCII 65 o binario 01000001 , En este codigo nay un 
numero par de unos y se esta utilizando el sistema de paridad 
impar (cualquier codigo contend ra siempre un n umero jmparde 
unos; el bit de paridad se establece, por lo tanto, en uno), Al 
mismo le sigue el bit de final, que senate el fin del codigo del 
caracter, Este codigo de caracter de ocho bits requiere 10 bits 
parasutransmisi6n 




Comunicaeiones/Aplicaeiones 




que se transmiten por segundo, si bien en la practi- 
ca esta no es una definici6n exacta, por razones que 
veremos mas adelante en este mismo capitulo. 

Las dos velocidades mas comunes para los dispo- 
sitivos de comunicaciones son 300 y 1 200/75 (signi- 
ficando esta ultima que los datos se reciben a 1 200 
baudios y se transmiten a 75)- La mayoria de los 
micros, a titulo comparative, guardan los progra- 
mas en cinta a una velocidad similar (entre 300 y 
1 200 baudios). 

La velocidad de 300 baudios se utiliza para siste- 
mas en los que se transmite aproximadamente la 
fnisma cantidad de datos en ambos sentidos. Estos 
incluyen los boletines y los sistemas de correo clec- 
trdnico como el Telecom Gold. La velocidad de 
1 200/75 baudios se emplea para sistemas de video- 
texto como el Prestel, en los cuales la mayor parte 
de la informacion se envia en una sola direccion. 

Lamentable me nte, tal como ocurre con otros 
much os aspectos de la informatica, estos estandares 
no son universaies. En razon de las diferencias exis- 
:tr:ef er.::= ^ <:s:er.a> telefonicos britanico y nor- 
Eeanexicaoo. por ejemplo. los dos paises utilizan 
frexxaaas distkfctas. La frecuencia de Gr an Breta- 
na se ooooce como el estandar CCITT (o V2IK 
mientras que fa de Estados Unidos es el tono Belt 
fen honor de la empresa telefdniea). 

Todo sobre bits 

Debido a que el sistema telefonico solo puede dife- 
lendarcon toda fiabilidad una cantidad iimitada de 
ireeuencias, los datos se transmiten en forma bina- 
ria. Para hacer esto, cada caracter se traduce pri- 
me ro a su equivalente ASCII y luego a su forma 
binaria. Por consiguiente, la letra "A" se converti- 
ng en 65 (ASCII) y luego en 01000001 (binario). 
Los unos se representan mediante una frecuencia 
if to por encima del tono de portadora y« por ello, 
se la conoce como "aita'*), y los ceros mediante otra 
(justo por debajo del tono de portadora y, por 
tanto, considerada ^baja")- 

Dado que el ordenador receptor (conocido como 
- anfi triofT o host) necesita alguna forma de saber 
dooele termma no caracter y comienza el siguiente, 
bits de comienzo y de final ♦ 
frecueocias convenidas: 
> ei jrfoiGB redbe m fait de final, por ejem- 
jfct, ^^g" los bits preoedeates. El protocolo 

r de daios segoidas de im bit de final. Una 
posibie ahernauva es la de siete bits de dates y dos 
bits de final, Otros sistemas utilizan tamo bits de 
comienzo como de final, indicando el cambio el 
final de un caracter. 
Puesto que la comunicacion a traves de la red de 
nos publica no es absolutamente fiable, nece- 
stamos algun inetodo de verification de errores, 
gratias al cual el anfitridn pueda asegurarse de que 
ha. retibido un caracter correct amente. La solution 
ample es lo que se conoce como "control de 
iii". Esta implica contar la cantidad de bits 
Ads impares (sistema de paridad impar) o bien 
' .-z :- Sterna de paridad pur). Por ejemplo, reto- 
"-•-" "p el ejemplo de la letra £h A ?; . el numero total 
de bfB altos de 01000001 es dos (un numero par). 
I^consiguiente^ de acuerdo a la paridad impar, el 
bst paridad tambien tendra que estar alto. En el 
caso de la letra "C", sin embargo, que se traduce 




Flujo de 
informacion 

El baudio, asi llamado en 
honor de J. IvL E. Baudot, 
pionero trances de la 
transmisitin de datos, esuna 
unidad de medidadela 
velocidad del fiujo de 
informacion entre dispositivos 
de comunicaciones. Una 
velocidad del baudio 
signif ica que la informacion se 
transmite a 1 bit por segundo. 
Los dispositivos quese 
comunican a traves deun 
modem sue I en utllizar 
velocidades de 300 baudios 
cuando se requiere una 
trans mision aproximadamente 
equivalente en ambas 
direcciones, Cuando la 
transferencia de datos es 
basicamente en una sola 
direccidn, como sucedeen las 
comunicaciones lipo 
videotexto, por ejemplo, se 
emptea una velocidad mas 
-fiMda.4e 1 200 baudios. 




como 01000011 en binario, el bit de paridad tendria 
que estar bajo. 

El control de paridad es relativamente poco so* 
fisticado: detectara un error de un unico bit, pero 
no detecta dos errores en el mismo caracter, por- 
que entOQces la paridad sera correcta. No obstante, 
es simple y util para la mayoria de las aplicaciones 
en las que no resulte vital una exactitud estricta. 

Hem os mencionado que la definicidn de bits por 
segundo no es exact a para la definition de baudio. 
El motivo de ello es que se han de tener en cuenta 
bits de comienzo, de final y de paridad, Por ejem- 
plo, en un sistema con control de paridad que utili- 
ce ocho bits de datos y un bit de final para cada 
caracter, solo 8 bits de cada 10 transmitidos con tie - 
nen informacion util For lo tanto, los verdaderos 
bits de datos por segundo son el 80 % de 300 bau- 
dios, es decir, 240 baudios. 

Hemos hecho un analisis detallado de los princi- 
pios fundamentales de la transmision de datos me- 
diante modems, En el proximo capitulo considera- 
remos otros aspectos del funcionamiento del 
modem, como transmision duplex y protocolos de 
terminales. 
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Programacibn/Juego de aventuras 



Rutinas de pant alia 

A lo largo de ires capitulos disenaremos pantallas de muestra para 
el BBC Micro, el Commodore 64 y el Spectrum 
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40 COLUMNAS 



300 



600 



P 

K 



1? 



AND 
O 



O 



NOT „ 

o 



— CO 

3 



250 



V 




I I i 

PRIMER aA|40jR0d0— " 
p/5 725 | jS50 




Mode demploi 

En un programa para el BBC 
Micro debeo tomarse varias 
decfsiones "comerciaJes"; las 
modalidades de alta resolucion 
gastan muchisima memoria y 
soportan pocos col ores; las 
modalidades para texto utilizer 
men os memoria, permiten 
mejores gamas de color pero 
s6lo soportan graficos en 
resolucidn media o baja, En este 
programa, Mode 1 proporciona 
las resoluciones necesarias, 
pero al costo de una memoria de 
pantalla de 20 K 




El h otoji 

En la imagan de la ALU para el 
BBC se requiere una forma de 
baton para represent last res 
opciones, AND, OR y NOT. Es 
precise redefinir un ca racier ya 
existente, Utilizando una 
cuadn'cuia de 8 por 8 podemos 
disenar una forma y 
representarla mediante 8 
nurneros decimates. Entcnces 
sepuede rede1inirCHR$(240) 
mediante VOU 23: 
VDU 23,240,60,1 26,255, 
255,255,255 J 26, 60 
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En este capftulo veremos como se pueden emplear 
las facilidades para graficos del BBC Micro para 
crear visualizaciones en pantalla para juegos de 
aventuras. El que hemos venido desarrollando, al 
que hemos Hamado Digitaya, es un juego de aven- 
turas basado en texto, Es detir* utiliza palabras 
para describir los ambientes imaginarios en los cua- 
les se situ a al jugadon Una aventura basada en 
texto. por ejemplo. simplemente visualizana el 
mensaje s Te h alias en la sala del trono" para evo- 
car un escenario, mientras que una aventura grafica 
intentaria dibujar una habitation con un trono. 

Las pantallas que disenaremos aqm visualizaran 
dos e scenarios de Digitaya que poseen un in teres 
especial: la entrada a la puerta para palanca de 
mando y la Unidad Aritmetico Logica (ALU). El 
numero de tales pantallas sueie estar limit a do por 
la cantidad de memoria disponible; las instruccio- 
nes que se requieren para producir cad a visualiza- 
tion ocupan un espacio de memoria que, de otro 
modo, quedaria libre para aumentar la complejidad 
de la tram a argu mental . 

Diseno de pantalla de la ALU 

Antes de que podamos comenzar a disenar una 
pantalla para el BBC Micro, debemos responder a 
varias preguntas: 

1) ^De cuanta memoria dispongo? 

2) ^Cuantos colores necesito? 

3) <• Cual es la resolucion requerida? 

Todas estas preguntas en realidad se pueden fundir 
en una sola: "^Que modaiidad utilizare?" Una re- 
solucion mayor y una gama de colores mas amplia 
significan que la zona de memoria para pantalla 



ocupara una valiosa RAM, En nuestro diseno utili- 
zaremos la modaiidad 1, que nos ofrece cuatro co- 
lores, una pantalla de 40 por 25 y una resolucion 
media. Hemos de establecer la modaiidad a utilizar 
insert ando al comienzo del programa la siguiente 
linea: 

1095 MODE 1 

Una vez detidida la modaiidad, podemos hacer un 
boceto de lo que sera nuestra pantalla, trazando a 
lapiz las coordenadas apropiadas a medida que 
vamos avanzando. El diseno elegido aqui produce 
el desplazamiento en la pantalla de las letras A, L y 
U en mayuscula. En el juego, el jugador debe pul- 
sar uno de tres botones (rotulados AND, OR y 
NOT) y estos tambien deben incluirse en la visuali- 
zation. Caractensticas adicionales incluyen un 
borde estrecho en todo el margen de la pantalla y 
un primer piano piramidal. A la izquierda de estas 
lineas podemos apreciar el aspecto grafico de nues- 
tro diseno primitive. 

Cada letra se forma con un desplazamiento 
(MOVE) hasta un punto inicial y utilizando lucgo 
PLOT 1 para dibujar la forma de la letra como una 
serie de lineas relativas al punto inicial, Al disenar 
las letras de esia forma, las podemos desplazar por 
.. t ...italla SEQlpleaiante cambiandn la hisirucuon 
MOVE initial. Asimismo, podemos borrar las letras 
vohiendo a dibujar sus lineas en la misma position 
pero espetitlcando un trazado OR-Excluyente me- 
diante e! empleo de GCOL 3. 

Los botones se forman redefiniendo un caracter. 
En este caso. CHRS(240) se redefine mediante el 
procedimiento bo ton para con vert irlo en la forma 
que vemos aba jo a la izquierda, Observe que 
CHR$(240) es asignado a la variable boton$ para uti- 
lizar en la parte principal de la mtina. Los botones 
y las etiquetas se pueden posicionar solo eon visua- 
lizarlos (PRINT) en las coordenadas especificadas en 
la instruction TAB, 

El primer piano se ere a empleando las primitivas 
de relleno triangular que proporciona la instruction 
PLOT 85. Esta instruction une el punto e specific a do 
a los dos puntos trazados previamente y luego llena 
el triangulo resultante con color. La forma cua- 
drangular del primer piano se puede dibujar y relle- 
nar mediante dos de estas primitivas de relleno. 

El codigo para la visualization en pantalla consti- 
tuye una subrutina de la rutina especial diseriada 
para tratar el escenario ALU del juego. La instruc- 
tion A$=GET$, de la linea 7560, espera que se pulse 
una tecla antes de restaurar el color original del pri- 
mer piano, limpiando la pantalla y re torn ando a la 
rutina ALU principal para seguir con el juego. Para 
llamar a csta subrutina grafica, tambien se debe i'n- 
sertar en el programa principal la siguiente linea; 

4565 GOSUB 7000; REM S/R IMAGEN ALU 
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Pantalla de la puerta 

En Digitaya, si el jugador se extravi'a en el escena- 
rio de la puerta para palanca de mando se encuen- 
tra en peligro de ser alcanzado por un rayo laser. El 
diseno de nuestra visualization en pantalla implica, 
por consiguiente, dibujar una puerta para palanca 
de mando de cuyo centra se emitan rayos laser. La 
puerta para la palanca de mando se dibuja utilizan- 
do varios caracteres punto impresos en la esquina 
superior izquierda de la pantalla, y se dibuja un ti- 
pico con tor no de conector tipo D utilizando grafi- 
cos en a!ta resolution y sentencias PLOT. Observe 
que despues del desplazamiento (MOVE) hasta la 
position initial, todas las sentencias PLOT siguientes 
que crean la silueta de la puerta son instrucciones 
PLOT 1 , lo que significa que dibujan en relation al 
ultimo punto trazado, Esto es sumamente conve- 
nient^, porque de dibujar las formas empleando 
una serie de instrucciones relativas, si se decidiera 
desplazar la position de la forma completa, solo de- 
beria ai terarse la prim era sentencia MOVE. 

El primer piano esta compuesto por un bloque 
de color rectangular, dibujado empleando nueva- 
mente dos primitivas de relleno triangulares. Para 
dar la sensation de profundidad, sobre el mismo se 
dibuja una serie de lineas convergentes utilizando 
un bucle FOR,., NEXT (tineas 8170-8200). El bucle 
establece el valor de X de 0 a 1280, la anchura de la 
pantalla en unidades de graficos, Se trazan hacia la 
parte inferior de la pantalla una serie de lineas, in- 
erementandose el punto de partida del horizonte 
para cada punto a medida que se mcrementa X. No 
obstante, en el horizonte el paso de 32, empleado 
entre lineas consecutivas en la parte inferior de la 
pantalla, se reduce a un paso de 4 (dividiendo por 8 
cada valor de X en la instruction MOVE que define el 
punto initial de cada line a). 

El efecto de los rayos laser se produce dibujando 
una linea que parte del centre de la puerta para la 
palanca de mando hasta un punto aleatorio del ho- 



rizonte y con un color al azar. Posteriormente la 
linea se borra (sin alterar el fondo) trazando la 
misma linea en la rnodalidad de trazado con OR 
excluyente, establecida mediante GCOL 3. El dibujo 
y borrado de cada linea estan ubicados dentro de 
un bucle REPEAT- ..UNTIL, junto con una compara- 
cion para comprobar si se ha pulsado alguna tecla 
en el teclado. El empleo de IMKEYS en lugar de 
GETS permite que la ejecucidn del programa conti- 
nue mientras dentro del bucle se esta comprobando 
una posible pulsation de tecla. Este bucle termina 
cuando se pulsa una tecla; entonces se limpia la 
pantalla, se restaura el color original del texto y se 
devuelve el control a la rutina principal de la puerta 
para palanca de mando. Para llamar a esta subruti- 
na de graficos se ha de insertar la linea siguiente: 

3845 GOSUB 8000: REM IMAGEN PUERTA PARA 
PALANCA MANDO 



Sufriendo un rayo 

Tanto en la pantalla de la puerta 
para la palanca de mando como 
en la de la ALU se hace un uso 
exhaustive de la faciiidad para 
trazado relativo, dado que la 
misma permite un borrado facil 
ye! movimiento de formas 
graficas completes. Para dibujar 
(DRAW) yrellenar (FILL) 
bloques solidos de color en alta 
resolution se utillza otra opcion 
de trazado 
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40 COLUiVliMAS 
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Pantalla ALU 




7490 G0LMRZ 

7500 PRINT Tflfi<27 ( 14)" MOT" 

7510 

7520 MOW 575.4Q0 
7530 PROCsigno i 
7540 : 

7560 REM "ESPEWfl TECLA" 

Jj^rs 
im *• z r.- z-,: : : - 



7T» 

Hffi 

7150 
7100 
7170 
7150 
7190 
BOO 
7210 

-lit 

7230 
72*6 
7250 
7260 
727D 
7230 
7290 
7300 
7310 
7320 

-ji: 



ccots^ 

FOR X=0 T03OOSTEF1O 

FOFU-1T02 

PR0Cletra_a 

NEXT I. A 

PR0Cletra_a 

REM LFJRA L ** 

FOR Y = 300 TO 5» STEP 10 

FOR 1 = 1 TO 2 

PfiOCletra I 

NEXT l,Y 

PflOCletraJ 

REM "LEtRAU " 

-3 RX= 1280 TO 650 STEP - J 

F0AI-HQ8 

PROCtom V 



7JO Rai-*B0T0NE$" 

iBtrawriA^ii.i5)b«(wis 

J4BB C0L0UR1 

WM PCWT W0.15)bDlon$ 

-422 golouas 

. . . __ - A s :,3.^|j C ! 0 nt 

a 3i "* !HS"RUCCl0N5S " 

TJSl FAHTTAS[10.'4>-ANO~ 



7700 
7710 
7720 
7730 
7740 
7750 
7760 
7770 
7780 
7790 
7300 
7610 
?SM 
7630 
7640 
7650 
7BS0 
7670 
7880 
7890 
7900 
7910 
792D 
7930 
7940 
7950 
7960 
7970 
7960 



HCWE72S.V 
PLOT 1 .- 150.0 
PLUT 1.0.200 
ENDPRDC 

DEF PROCIflra u 

PLC! 1.0,-200 
PLOT 1150.0 
PLOT 1.0.200 
EJBPROC 

0EF PflOClMtW 

VDU 23.240.W.121S.255 .255 .235 .255, 1 26.60 

6Dlnn*=CHRJ{240} 

ENDPFtOC 

DEFPflOCsiymo i 
PLOT 1,0.60 
PLOT 1.150.0 
PLOT 1,0.-70 
PLOT 1.-75.0 
Pt tJT 1.0.-50 
PJ.0T 0.-0,-30 
PLOT 1,16.0 
PIOT 1,0.-16 
P10T 1,-16.0 
PI0T1A16 

REM *' 1 * IMAGEN PUERTA PARA PALANCA MANDO ■ 



VOU23, i.o.0:o:ti: 

CLS 

ftEM " B0R0E " 
GCEH. 0.1 
MOVE 0,0 
DRAW 0,1023 
DRAW 1279,1023 
DRAW 1279.0 
DftAWa.D 

REM " HJ0RIZ0WTE '* 
PlOTa5J270^0 
:-: Zi-i 

rgqUui 

: = : - : y== ii 

DRAWX.0 
«ECTX 

RS* " PALANCA BEMAWO " 

caouR2 

PmWTTABfa.2)-J0VSTlCK POfST* 

FfllNTTAB(25,6)- . . . 

MOVE 796.653 
Pl0T1 r 2fia.D 
PtOT 1.4.-4 
Pt 0T 1.4, -4 
PtOT1.6 r -4 
P10T1.-4.-4 
PLOT 1.-30, -61 
PtDT 1.-4.-4 
PLOT 1.-4. -4 
PLOT 1.-210.0 
PLOT 1.-4,4 
PLOT 1-4,4 
PLOT 1.-30,01 
F.01 1 AA 
PLOT 1.0.4 
PL0T1 r 4.4 



6010 : 

B020 REM" CURSOfiAPACADO ' 



3022 
6040 
8050 
8060 



80S?3 
8100 
8110 
8120 

e--: 



8250 
8260 
8270 
8260 
82£0 
8300 
8310 
8320 
8330 
8340 
8350 
8360 
8070 
8300 
53*0 
8400 
8410 
8420 
8430 



8450 REM ■ ' DlSPARO " 
8450 REPEAT 
8470 AS- INKEYS 10) 
8460 K-RND(1279):Y-3ZO 
8460 DCOi 3, F f, d-'V 
8500 FORJt1T0 2 
8510 MOVE 946,836 
8520 DRAW X.Y 
8530 HPTTt 

8540 OMTILASo- "flEH ESPERAR PUlSAClOh' TECLA 
8550 ; 

m 3 R EM ■ ' VC ViSR A EN SE MD E/" 1 CL R ; 0« " " 

8570 VMJ23.1,U0:O:O; 
8575 C0L0LIR3:CLS 
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Software/Paquetes educativos 



Un buen comienzo 

Es esencial que el software educative para ninos tenga un buen 
diseho y clarf dad en sus objetivos 



Los objetivos didacticos de los paquetes que exami- 
naremos abarcan desde el reeonoeimiento de colo- 
res y formas simples, pasando por aptitudes basicas 
de lectura y numericas, hasta refmados intentos 
para ampliar las capacidades artisticas del nirio. 

Todos los paquetes son bastante directos al expli- 
carle al usuario lo que tiene que hacer, Esta debe 
ser una prioridad en todo programa educativo: el 
nino debe comprender totalmente lo que se espera 
de el y se le deben dar recompensas claramentc de- 
finidas una vez que ha conseguido una habilidad. 

En segundo lugar, el programa debe ser facil de 
utilizar. No ticne sentido que un programa que pre- 
tenda proporcionar al nino aptitudes para la leetura 
empiece con una lista de instrucciones de funciona- 
miento. Los mejores programas solo incluyen un 
ininimo de estas instrucciones. 

Un programa educativo debe suscitar cl tnteres 
del nino. Independientcmente de lo importantes o 
valiosos que sean sus objetivos ultimos, no obten- 
dra ningun resultado si esta por encima de las capa- 
cidades del nino o si se vuelve repetitive y aburrido, 

Por ultimo, la prueba de fuego de un programa 
educativo es que ensene aquello para lo que fue 
disenado. Este parece un punto obvio, pero con 
frecuencia las firmas de software olvidan los objeti- 
vos didacticos de un programa para favorecer su 
valor como fuente de entretenirniento, 

Los paquetes que analizamos a qui los producen 
las empresas norteamericanas Spinnaker y Fisher- 
Price. Aunque estos programas en Estados Unidos 
existen en formato de cartucho, en Europa se co- 
rn ercializ an en cassette, Mientras que a un nino pe- 
queno se le pucde mostrar claramente como debe 
insertar un cartucho en el ordenador y encenderlo 
(para que sea capaz, por consiguiente, de cargar 
por si mismo su programa), el formato de cassette 
exige invariablemente que hay a cerca un adulto 
que lo ayude a cargar el programa. 

Dance fantasy 




De todos los programas que hemos examinado, 
tal vez el mas atractivo sea Dance fantasy (Fantasia 
de la danza). de Fisher- Price, destinado a ninos dc 
entre cuatro y oeho anos. La visualization en pan- 
talla muestra un escenario en el que hay dos figuras 
de pie, y se le solicita al usuario que haga la coreo- 
grafra de un baile para los dos personajes. Antes de 
comenzar a trabajar, se pide al usuario que especi- 
fique el sexo de los bailarines: un varon y una 
mujer, o dos varones o dos mujeres. 

En la parte inferior de la pantalla el programa 
visualiza una gama de figuras en diversas poses: 
cada una representa una rutina de danza particular 
(un salto, una giga, etc) Moviendo uno de los bai- 
larines sobre una de estas figuras mediante la pa- 
lanca de mando el nino efectivamente elige esa de- 
terminada rutina, y fuego vuelve a situar la figura 
en el escenario, y acrionando el pulsador de dispa- 
ro obtiene su ejecucion. De este modo, se puede 
realizar la coreografia de un baile selection ando 
una serie de movimientos y ejecutandolos en dife- 
rentes puntos del escenario, proporcionando el 

Aegean voyage 




programa los movimientos de conexion. Una vez el 
nino ha completado un baile, puede guard arlo 
(SAVE) y con templar despues el efecto global 

Como habra observado a parti r de esta descrip- 
tion de Dance fantasy , el punto fuerte del progra- 
ma consistc en que es una imaginativa analogia de 
lo que es un programa para ordenador: el nino crea 
su propio baile (programa) utilizando una serie de 
rutinas basicas (un con junto de procedimientos). El 
mismo se guard a (SAVE) luego en cassette y se 
carga desde el mismo (LOAD), introduciendo de 
este niodo a I nino sin ningun a dificultad en el signi- 
ficado de estos dos t terminos. 

Aegean voyage (Viaje por el Egeo), de Spinna- 
ker, dirigido a un grupo de edades ligeramente 
mayor, emplea personajes y escenarios de la mito- 
logia griega como elementos de un sencilio juego 




aquetes educativos/Software 



ie aventuras, El objetivo consiste en hacer navegar 
un barco desde Atenas hasta diversas islas del mar 
Egeo, evitando rocas y tormentas durante la trave- 
sia. Al llegar a la seguridad de un puerto, se visuali- 
za el nombre de la isla y en la parte inferior de la 
pantalla aparece un mensaje criptico. El jugador 
debe entonces decidir si explora o no la isla: una 
decision correcta le sera recompensada con un teso- 
ro, como ? por ejemplo, el escudo de Aquiles; una 
decisi6n incorrecta determinara el hundimiento del 
barco a manos de una criatura mitica, como, por 
ejemplo, Gorgona. 

A los escolares entendidos en mitologia clasica 
les resuttara desconcertante deseubrir que en el 
juego hay datos erroneos: el Minotauro, por ejem- 
plo, es tan probable que aparezca en la isla de 
Delos como en Creta. El juego no hace ningun in- 



Number tumblers 



Kindercomp 




ten to por explicar el significado de los nombres o 
de los lugares; es muy improbable que gracias a 
esta cassette el nino llegue a adquirir siquiera una 
education clasica superficial* Tambien es poco pro- 
bable que el juego logre mantener el interns del 
nino durante mucho tiempo, porque los graficos y 
el formato carecen de interes y son repetitivos. 

Di sen ado para desarrollar aptitudes para la aril- 
metica mental en nirios de entre ocho y doce anos, 
Sumber tumblers (MaJabaristas de los numeros). 
de Fisher-Price, posee !a velocidad y las sensacio- 
nes de un juego recreative. En la pane superior de 
la pantalla se \isualiza una serie de numeros. y el 
jugador ha de acomodar los simbolos numericos y 
aritmeticos de las caras de un conjunto de dados 
para erear una ex pre 5 ion matematica que sea igual 
a alguno de los numeros. El juego es rapido, posee 
graficos brillantes y bien disenados y constituira un 
autentico incentivo para que el jugador perfeccione 
sus aptitudes de calculo mental. 

Kindercomp, de Spinnaker, esta destinado a 
ninos de entre tres y ocho anos de edad. El objetivo 
del paquete es introducirlos en el tern a de los orde- 
n adores y desarrollar aptitudes art 1st teas. El paque- 
te se compone de una serie de ejercicios diferentes. 

Este paquete lo escribio origin almente el doctor 
Doug Davis para su hija, presumable m en te como 
fuente de entrenamiento. Lamentablemente, Kin- 
dercomp da la sensation de consistir mayormente 
en hacer trucos con el ordenador, la clase de cos as 
que disenan la mayoria de los programadores cuan- 
do estan aprendiendo basic y descubriendo las ca- 
pacidades de la maquina. Por ejemplo , una de las 




opeiones es :t Nonibres". Se invita al usuario a en- 
trar un nombre, o una frase corta, dc hasta 15 ca- 
racteres de longitud, que se visualiza luego a traves 
de toda la pantalla en diversos tamanos y colores. 
El efecto es muy atractivo y a un nino que no este 
familiarizado con los graficos por ordenador 1c pa- 
recera asombroso desde el punto de vista visual. 
Sin embargo, el programa parece tener muy poco 
valor educativo. puesto que cualquier grupo de le- 
tras proporcionara ef mismo efecto. 

Es muy poco probable que Kindercomp logre 
mantener al nino ocupado durante mucho tiempo. 
Los trucos de programacidn son divertidos pero en- 
seguida se vuelven repetitivos. Es la clase de pa- 
quete que con toda seguridad mantendra al peque- 
rio usuario ocupado durante tres dias mas o menos 
y que dc spues jamas se vol vera a utilizar. 

El ultimo paquete que examinamos esta destina- 
do a los ninos de muy corta edad. A If in the color 
caves (Alf en las cuevas de colorcs), de Spinnaker, 
caracteriza a un divertido personajillo que se desli- 
za y se escurre por entre numerosos tubos, llcnos 
de coIot y de diversas formas, dc una habitation de 
la parte inferior de las cuevas. Utilizando una pa- 
lanca de mando o el teclado, el nino lo va guiando a 
t raves de las cuevas y si lo conduce a salvo sin ser 
detect ado por un par de ojos amenazadores que se 
mueven muy rapidamente. el nino obtiene como 
recompensa el espectaculo de ver a Alf ejecutando 
una deliciosa danza, Luego es absorbido por el 
tube hacia arriba. nuevamente hasta el irivel del 
suelo. para iniciar otro descenso. 



Alf in the color caves 




1ST 




Juegos 



Mision espacial 

He aqui uno de los programas mas interesantes escritos para los 
ordenadores Atari. Utiliza tanto basic como lenguaje maquina 




Los movimientos de los diferentes elementos que 
aparecen en la pantalla estan escritos en lenguaje 
maquina. Io que permite una velocidad superior a 
la que se obtiene con basic. El jugador es el coman- 
dante de una nave espacial que se desplaza por una 
lejana galaxia; dado que la nave ha sido alcanzada 
por un meteoro, debe, superando cualquier dificul- 
tad que se presente, regresar a la base principal 
para reparar las avenas sufridas. jAtencion!, le 
quedan solo 300 I de oxigeno, 

Utiiiee la palanca de mando para conducir su 
nave. Si tiene exito en su cometido, la cantidad de 
aire que quede Incrementara su marcador, Ouienes 
se interesen por los subprogramas en lenguaje ma- 
quina encontraran el listado correspondiente a con- 
tinuacion del de basic. 



10 flEM .****.™«™*™**.*« 

20 REM * MISION 
30 REM T ESPACIAL 

40 REM""— * *"* 

SO GOSUB 10000:REM ' p INICIAUZACION " T 
60 GOSUB 2000 

65 SOUND 0,0,8.15; POKE 53278,R: AIR— 300 
70 X=USFlf1536) 

60 IF PEEK(781 + R * 256) = 24 THEN 1 000 
90 IF PEEKf 53254)<>0 OR PEEK(53262) < >0 THEN 
GOTO 2000 

100 AIR=AIR-1:IFAIR<>0THEN7C 

110 POSmON 4,6:? "aire agolado' :SC-D 

115 POKE 53251,0 

120 FOR P=0 TO 4000 STEP 12 

130 SOUND D,P,10,t5:NEXT P 

140 SOUND 0,0,0.0 

150 POSITION 4,6:? "pulse START 

155 POSITION 4,4:? ''puntos^SC 

160 POKE $3279,0 

1 70 IF PEEK(53279) <>6 THEN 1 60 

180 POSITION 4,6:?" "iGQSUB 10100 GOTO 

65 

1000 IF PEEK{209)>PEEK(203) AMD ?EEKi209KPEEKf204'i 

THEN 1020 
1010 GOTO 2600 
1026 POSITION 4,6:? u bravo" 
1025 POKE 53251,0 
1030 FORP=230T010STEP-T0 
1040 FORX=P-5T0P+5 
1050 SOUND 0X10,15 
1060 NEXTX 

1 070 SETCQLOR 1 ,RND{0r 1 6,10 

10B0 NEKTP 

1090 SOUND 0,0,0,0 

1 1 00 POSITION 2 1 .4:? "BONUS EN Al RE:" ;AI RE 
1110 SC=SC+AIR:G0T0 150 

2000 FOR P=781 TO 896: IF PEEK(R T 256+P)<>24 THEN 

NEXT P 
2005 POKE 53251.0 

201 0 E - 53770; P0 KE P + 256* R + RN D(Q) + 8 , PEEK(E) 
2020 SOUND 0,PEEK(E),8, 15: POKE 706,PEEK{E) 
2030 S=S+1:IFS<50TOEN 2010 
2035 POKE 53250.0: POKE 53251,0 
?XM 3 OSC -S: GOTO 140 
1 0000 GRAPH ICS 0: D L = PEE Kf 560) + 256 * PEEK(561 ) 
+4:P0KE82,Q 

100T0 POKE DL-i 5 J:POKE DL f 6, 6:POKE 01 + 7, 6: POKE ' 

DL- 5.5 -POKE OU 9.6 
1 0020 SETCOLOR 4,9,4:SETCOL0 R 1,3,4: POKE DL r 1 0 , 6 
1 0636 SETCOLOR Q.3,6:SETC0La R 1 , 13,10 
10646 POSITION 0,4:POKE 752.1 
10050 ?" MISION ESPACIAL": 
10055 ?' ***.**•>, 
10060 ? "estas pendienda aire ": 
10070 ? DEBES reunirte 
10090 '"coniarwenwlit "; 
10090 7" ...BUEMA SUERTE!!! 
10100 R=PEEKf1 06) -S: RESTORE 
10110 FO Ft P=R" 256 +51 2 TOP* 256 +1024 



10120 POKE P.0-NEXT P 
10130 FOR P=10T0 17 
10140 READ A, B 
16150 PQKER*256+512+P.A 
16160 POKER "256+640 +P,B 
10170 NEXT P 

1 01 80 DATA 7,224,62,124. 1 1 1 ,246 
10190 DATA 255,255.214,107 
10200 DATA124,62,60.60 4 32 
10210 F0RP-^0TO7 
10220 READ A 

10230 POKE FT 256+ 706+60 +P,A 
10240 NEXTP 

1 0250 DATA 24 , 60 ,36.60.36, 1 26 90.255 

10260 FOR P^G TO 6 

10270 READ A 

10280 POKE R*256- 396^ 

10290 NEXTP 

10300 -J CHRS(i 25l:C0LOR 160:PLOT 0,20:DRAVrTO 39,20:? 

CHRS(160):P05i- 
10310 POKE 704,6*16 
10320 POKE 705 ,B*16 
10330 POKE 706,15*16+10 
10340 POKE 767,3*16+4 
10350 POKE 53277.3 
10360 POKE 559.46 
10370 POKE 53248,110 
10380 POKE 53249,126 
10390 POKE 53250,103 
10400 POKE 53256,1 
10410 POKE 53257,1 
10420 POKE 5325$, 1 
10430 POKE 53259.1 
16440 POKE 623.1 
10450 POKE 54279, R 
10460 DATA 24 ,60, 1 20 ,255 , 255 ,0, 0 
10470 POKE 203. 110: POKE 204 126 
1 0^ 0 POKE 206 , (IVTfR N D f 1 ) ' 2 1 + 1 : P0 KE 209 . 1 03 
1 04S5 K=R *2&6 + 768:POKE 266, INT{K/256) :P0KE 

20 5. K- (256 "PEEKf 206)) 
10490 RETURN 

20000 FOR A=1536 TO 1676: READ B:P0KE A, 6: NEXT A 

20001 DATA 104 J 85,208,201, 1,240,1 7.230. 
203.230.204.165.204,261.200.208,21,169 1 
133.208.76,36,6,193 

20002 DATA 203, 1 98.204, 1 65 .203 . 201 , 56 , 20,6 . 
4,169,2.133,208.165.203,141 .0.208.165 204 
141,1,208,173,120 

20003 DATA 2, 201 ,1 1 ,240,10,173.126.2,261 , 
7,240,8, 76 ,72.6, 1 96 .209, 76,72,6,230,209, 1 65 , 
209,141 

20004 DATA 2,206 . 1 73 , 1 32, 2, 201 ,0,240 , 1 1 
169,0,141 .3,208,141 ,0,210.76,127.6.173.10. 
210,141,195 

20005 DATA 2,165.209, 1 41 .3. 208, 1 69,130, 

1 41 ,0, 21 0. 1 60,0 . 1 77 , 265 , 1 36,145.205 ,200,200 , 
192,0.203,245,75 

20006 DATA 1 40 , 6, 1 60,0. 1 77 ,205 .200, 1 4S.205, 
136,136,192,0.208,245,95 

20007 RETURN 



10 '-S600 

20 ; 

W H0R3-S^ 

60 P^, t 
90 LOALf 

5 fir 

ft?R0 L0A#t 

lit 

0320 eg? 

Use 

B% 




5 If 

0600 

s El 

0640 ^ P Jf #Q 
0690 QEJ 

s if* 

0730 
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Camaras fotograficas/Hardware 



Mir ada certera 

Las mas modernas camaras incorporan microprocesadores, que 
se encargan de los detalles tecnicos necesarios para obtener una 
buena f otograf la 



Cuando hace una fotografia, la primera tarea del 
fotografo es decidir la exposition correcta. Ello im- 
plica deterrmnar cuanta luz de una escena en espe- 
cial llegara hasta la pelicula de la camara: si es de- 
masiada, la fotografia quedara descolorida; si es 
moy escasa, esta sera tan oscura que no se distin- 
guira nada. Para conseguir la exposicion correcta es 
necesario hollar un equilibrio entre la apertura (el 
tamafio del agujero de la lente, que determina 
euanta luz penetra) y la velocidad de obturation, 
que determina la longitud de la exposition. 

Por consiguieote. la cantidad de luz de una esce- 
na en particular se debe primero medir y, teniendo 
en cuenta la sens! bil id ad de la pelicula. detenninar 
en consecuencia la apertura y la velocidad de obtu- 
ration. Con el correr de los anos se ban desarrolla- 
do mcdidores que permiten al fotografo efectuar 
una medicion fiable del brillo de una escena. Mas 
recientemente se ban incorporado a las camaras 
medidores de exposicion, si bien el fotografo toda- 
vfa debe seleccionar una velocidad de obturation y 
la apertura de acucrdo a la lectura del medidor. 

Los avances que experiments la electronic^ en 
los anos setenta ha hecho posible tradutir la lectura 
del medidor de luz directamente en puntos para la 
apertura o la obturation. Ello se realiza sin que el 
fotografo intervenga en absolute, de modo que se 



pueden obtener resultados de buena calidad sinv 
plemente dirigiendo la camara hacia un determina- 
do punto y disparando. Esta facilidad es partieular- 
mente util tanto para el principiante, que desea 
tomar fotografias sin entender como funciona la 
maquina, como para los fotografos profesionales, 
que muchas veces necesitan hacer fotografias en 
conditioner in ad ecu ad as. 

La Canon Al ofrece seis modalidadcs diferentes 
para hacer fotografias. Estas son; 

1) Prioridad a la obturation: El usuario selecclona 
una velocidad de obturation y la camara establece 
la apertura correspondiente. 

2) Prioridad a la apertura: El usuario selecciona 
una apertura y la camara establece la velocidad de 
obturation. 

3) Programa: La camara establece tanto la veloci- 
dad de obturation como la apertura mediante un 
programa que las combina dptimamente. 

4) Flash automatical Si esta equipada con ciertos 
flashes, la camara establece de forma automatica la 
velocidad de obturation adecuada para flash (1/60 
segundo) y establece la apertura correspondiente 
para este + Un medidor dc luz situado en el flash 
reduce el poder de este cuando ya ha rebotado sufi- 
ciente luz desde el tema. 




Camaras eficientes 

Desde los anos setenta los 
microprocesadores han venido 
controlando las fund ones 
interreiacionadas de Ja medicion 
de luz y el punto de apertura. 
Las camaras controladas por 
microprocesador de hoy en d(a 
son capaces de mucno mas: se 
ocupan de la otrturacidn, la 
exposicion y las f unciones del 
flash para permitir que un 
usuario novate real ice to mas de 
gran calidad, aun en 
condiciones deluz 
desfavo rabies. Dos de tales 
camaras son la Nikon FA y la 
Pentax Super A. capaces de 
efectuar pro gramas alternatives 
de control que abarcan una 
1 1 i de situaciones diferentes 
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5) Prioridad de apertura diafragmada: Es para len- 
tes de tipo antiguo y ciertos accesorios que funcio- 
nan con la apertura de la Icntc siempre "diafragma- 
da" a I valor utilizado para tomar la fotografia, Las 
lentes mode mas permanecen en el punto maximo 
de apertura, excepto en el instante en que se toma 
la fotografia, para mantener la imagen del visor lo 
mas brillante posible. 

6) Manual: El fotografo establece tanto la velori- 
dad de obturacion eomo de apertura. Es util para 
obtener un control total cuando se desea un efecto 
especial o la iluminacion cs extraiia. 

Una visualization electronica dentro del visor de la 
Canon Al indica al fotografo en que modalidad 
esta la camara y que valores ha establecido para la 
obturacion y la apertura. La visualizacion cmplca 
LED para que sea visible incluso en !a oscuridad. 

A pesar de la utilidad general de la modalidad 
programa de la Canon A 1 , esta funciona de acuer- 
do a una formula bast ante simple. Esto significa 
que, en unos pocos casos, no selecciona la mejor 
combinacion posible. Por ejemplo, si se estuvieran 
sacando fotografias a ultima hora de la tarde, la ca- 
mara podria seleccionar una velocidad de obtura- 
cion de 1/30 segundo y una apertura de f/2,8. Las 
fotografias tomadas a una velocidad de obturacion 
inferior a 1/60 cor re n el riesgo de arm in arse por los 
imperceptible s movimientos de la mano del foto- 
grafo (lo que se conoce como "temblor de la cama- 
ra"). Cuando la velocidad de obturacion desciende 
de 1/60 segundo ? la camara hace centcNcar un 
aviso previniendo del peligro del temblor de la ca- 
mara, pero el programa no selecciona una apertura 
mayor para permitir la mayor velocidad de 
obturacion. 

La competencia de Canon 

Algunas empresas rival es han lanzado camaras de 
mod alidades multiples con rnicroprocesadores in- 
corporados. La Pentax Super A utiliza un progra- 
ma Iigeramente mas sofisticado que ia Canon AL 
que le proporciona una mejor combinacion de ve- 
loeidadcs de obturacion y aperturas tanto con luz 
intensa como con luz tenuc. En la situation de u ul- 
timas horas de la tarde" que describiamos antes, la 
Pentax Super A scleccionaria una velocidad de 
poco menos de 1/60 segundo, de modo que habrfa 
menos posibilidades de que se produjera un tem- 
blor de camara. Y la Nikon FA, fabricada por el 
rival por cxcclencia de Canon, detecta automatica- 
mente cuando hay instalado un teleobjetivo (iongi- 
tud focal de 1 35 mm o mas) y accede a un programa 
alternativo, Este esta optimizado para evitar el 
temblor de camara con una lente mayor mediante 
el empleo de velocidades de obturacion mas ra pi- 
das y may ores aperturas. 

Haciendose eco de la tendencia de Nikon, 
Canon ha utilizado tres programas alternatives en 
su ultima camara, la Canon T70. Uno es para lentes 
normales, otro para teleobjetivos y ei tercero para 
lentes granangulares. No obstante, la camara no re- 
conoce automaticamente cual es la lente instalada, 
por lo que el usuario debe seleccionar el programa 
apropiado. Esto no representa necesariamente un 
inconveniente, puesto que permite un pequeno 
control creativo adicional. Por ejemplo, si usted 
esta disparando hacia un punto que se mueve rapi- 



Imagen del visor 

Al utilizarel hazde imagen, el 
visor da una imagen ,J a traves de 
la lente" (reflex) 



Fantasia LCD en 

modalidad programa 

La Canon T70 posee tres 
programas para exposition- 
apertura seleccionados por al 
usuario (para lentes normales, 
teleobjetivos y g ranangu lares) , 
mas op ci ones manual y 
semiautomatica 





Espejo con resortes 

Oirige e) haz de la imagen hacia 
el prisma del visor nasta que se 
acciona el pulsadorde 
obturacion 

damente con una lente gran angular, puede selec- 
cionar la modalidad de teleobjetivo para obtener 
grand es velocidades de obturacion y asegurar que 
la action se congele. 

Otro problema de las camaras automaticas es 
que dan una exposicion promedio para to da la ima- 
gen, y los objetos eon una extremada gam a de bri- 
llo en la imagen pueden enganar facilmente al me- 
didor. Por ejemplo , si se fotografia una motocicleta 
contra un fondo de atardecer, la camara tendera a 
dar la exposicion correct a para el sol y bar a que la 
moto quede demasiado oscura, Por otra parte, si la 
motocicleta se fotografiara contra un fondo oscuro, 
la camara t rat ana la escena como si fuera mucho 
mas oscuro de lo que en realidad es y probablemen- 
te la fotografia quedaria sobrcexpuesta, 

La Nikon FA utiliza una novedosa forma de 
abordar el problema. En vez de tomar una sola me- 
did a del brillo de una escena, mide cinco partes di- 
ferentes de la misma. La FA emplea luego un mi- 
croprocesador para comparar las cinco lecturas con 
varias "escenas estandares" program adas en la ca- 



Microfotos 

Una CPU de ochobits 
construtda especiafmente 
controls la operacidn global 
de 3a Canon T70, con la ayuda 
de chips demedicitinyefe 
ISO. El oscifador 
temporizador de crista] genera 
los impulses sincronos del 
reloj y controla la longitudde 
la exposition. Unos contactos 
controlados por ei medidor 1C 
establecen la apertura, Se 
puede incorporar un mddulo 
optional de instruct ones que 
ofrece exposicion automata 
a mtervalos (entre un segundo 
y un dia) y permite escribir 
directamente en el negative 
los datos detemporizacidn 
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Camaras fotograficas/Hartlware 




Kazde laimagen 

La luz proven iente del objeto 
pasa a t raves de la Iente hacia e! 
visor o a la pel icula 



canon no 



715 g con Iente de 
50 mm 



50 mm x f 1,8 



APERTURA 



f 1.8 — f 22 
1/1000 — 2 segundos 




Hazmedidor del flash 

La duration y la imensidad del 
flash se deferminan midiendo e; 
haz de ia rmagen 



CELUU FOTOELECTRICA DE 
SfUCK) Y MEOIDOR IG 



PILA OE RESERVA 
DE LITIO 



CONTACTOS PARA 
SELECCfON DE MOO. 




RMTTALLA LCD 
3>j ACT1VAD0RA 



0SCILAD0R TEMPORIZ 
DE CRJSTAL 



PBC FLEXIBLE 



mara. Cada una de estas escenas se produce anali- 
zando centenares de fotografias. 

Pero de todas las camaras disponibles en la ac- 
tualidad, la que hace el uso mas cabal de la electro- 
nica es la Canon T70. La 170 no posee controles 
mecanicos; todos sus ajustes se efectuan accionari- 
do pufsadores. Se puede seleccionar una de sus 
ocho modalidades accionando un pulsador situado 
en la parte superior "izquierda de la camara. Este 
hace que aparezca information en una gran LCD 
situada en ta parte superior derecha de la camara. 
La informacion importante, como la velocidad de 
obturation, la apertura y la modalidad, tambien 
aparece en et visor, de manera que el fotografo al 
encuadrar una fotografTa no tiene que alejar la ca- 
mara de su ojo. 

La Canon T70 en accidn 

Cuaiido se selection a una velocidad de obturation, 
los ajustes se efectuan en relation al valor actual 
visualizado en la LCD, mediante dos pulsadores 
que aumentan o disminuyen la velocidad. La sensi- 
biiidad de la pelicula (conocida como su numero de 
ASA o ISO) se establece de forma muy similar. El 
contador de disparos. que muestra cuantas fotogra- 
fias se han tornado, tambien aparece en la visualiza- 
tion en cristal Ifquido. 

La maquina posee un motor incorporado para 
avanzar la pelicula y rebobinarla cuando se termina 
el carrete. La T70 funciona con dos pilas normalcs, 
y en la LCD hay tres barras que indican su estado, 
Si aparecen las tres barras, las pilas estan nuevas; 
dos barras senalan que estan parcialmentc agota- 
das ? y una barra avisa que es necesario sustituirlas. 
Si se utiliza el disparador automation una visualiza- 
tion en la LCD cuenta hacia atras los segundos 
hast a liberar el obturador. 

Los micropr oces ado res q u e se utilizan en las ca- 
maras son mucho menos potentes que los que se 
emplean en los orden adores. La T70 posee su pro- 
pio microprocesador de ocho bits de fabrication es- 
pecial, que es de tipo CMOS para mantener a I rm- 
nimo su cons urn o de energia. Opera a una veloci- 
dad de reloj de solo 32 KHz; los microordenadores 
trabajan aproxi m ad ame nt e 100 veces mas rapido. 
Cuando no se la esta utilizando, la camara pasa a 
unos magros 8 KHz para economizar potencia. 

El microprocesador esta alojado en un paquefe 
piano de 60 patillas y posee una gran cantidad de 
ROM pero solo 16 K de RAM Con el microproce- 
sador trabajan otros cuatro chips, siendo el mas im- 
portante el de entrada/salida. Este controla la ope- 
ration mecanica de la camara gracias a unos imanes 
y un motor. Asimismo, convierte la serial electrica 
analogic a del chip del medidor de luz en una serial 
digital que pueda ser comprendida por el micropro- 
cesador, ' 

El poder de la microelectronica hace posible dis- 
frutar enormemente captando fotografias de gran 
calidad sin tener que comprender las complejidades 
de la fotografia. Aun asi, siempre habra casos en 
los cuales la camara dara una exposition incorrecta 
o enfocara el objeto equivocado. La persona que 
realmente entienda el funcionamiento de una ca- 
mara siempre estara en una situation ventajosa res- 
pect o a un principiante que posea un equipo foto- 
grafico sofisticado, pero ano tras ano esta ventaja 
se esta reduciendo cada vez mas. 
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Fuente de e nergia 

En esta ocasion analizaremos los servomotores y sugeriremos 
algunos usos a los que se pueden destinar 



Bestia de carga 

El brazo- robot Beasty esta 
alimentado portres 
servomotores (giros de base, 
hombro y codo) con un cuarto 
servomotor opcional para 
activar el efector final. El 
servomotor es ideal para el 
brazo-robot, precisamente 
porque se lo puede mover y 
despues fijar en esa position 



Existen tres tipos de motores electricos: de corrien- 
t.e directa, paso a paso y servo. Un motor de co- 
rrienie directa (CD) se puede controlar fatilmente 
por ordenador. pero tiende a ser imprecise si en- 
cuentra cualquier resistencia. En tal situation se re- 
duce la velocidad del motor y el ordenador no 
puede mantenerse informado sobre su posici6n. 

Un motor paso a paso no tiene este problema, 
porque se mueve en intervalos de angulo fijo (por 
ejemplo, 7 ? 5°) cada vez que se le da un unico im- 
pulse de corriente, Contando los impulsos, y supo- 
niendo que el motor no este nunca sobrecargado, el 
ordenador puede calcular la position del motor. 
Los motores paso a paso se utilizan mucho en los 
sistemas controlados por ordenador, como brazos- 
robot, tornos, distribuidores, etc. Sin embargo, los 
impulses de control tambien le distribuyen energia 
al sistema y, por lo tanto, los motores requieren 
activadores construidos e special men te. 

En las tiendas de rnaquctas y mode los a escala se 
pueden adquirir pequenos servomotores digitales, 
ya que estos se utilizan comunmente para los avio- 
nes, barcos, coches, etc., controlados por radio, El 
tamano de estos motores varia desde aproximada- 
mente la mitad de una caja de fosforos hast a casi 
diez veces ese tamano. Algunos servomotores son 
sumamente fuertes y cap aces de proportion ar mas 
"momento de torsion" (termino que se utiliza para 
describir cualquier fuerza que provoque una rota- 
tion) del que podrian producer ia mayoria de las 
personas empleando un destomillador grande, Ln- 
cluso los motores mas baratos de este ripo son ade- 
cuados para hacer brazos-robot pequenos, etc. 

Un servomotor digital pequeno. como un Futuba 
FP-S126 o un Axoms AS-1, con tiene un potencio- 



SERVOMOTOR 
t DEL HOMBRO/ 



SERVOMOTOR 
DEL CODO 




metro de real i mentation y un diminuto motor CD 
enlazado (mediante una serie de engranajes) a un 
"asta", Esta ultima es una prominentia del motor 
en la cual se pueden fijar palancas, dientes de en- 
granaje, etc. El motor tambien es ideal para mon- 
tar un sistema de bucle de realimentacidn con un 
ordenador. ya que la caja del motor tambien con- 
tiene todo el sistema de circuitos necesarios para 
hacerlo, asi como un chip controlador del circuito 
integrado. 

Un servomotor digital tipico de modelista se ali- 
menta desde una fuente de 5 V y su angulo (posi- 
tion) se establece a traves de un cable de control 
separado.Un impulso de un milisegundo (1/1000) 
desplazara el asta en una direccion, mientras que 
un impulso de dos milisegundos la movera en la 
otra direction, describiendo el mismo angulo, Las 
variaciones en el angulo de movimiento son pro- 
portionates a la duration del impulso. 

Sin embargo, el motor permanecera activo solo 
durante unos 20 milisegundos despues del impulso, 
momento en que se "relaja" y retorna a su position 
original. Por consiguiente , para mantener la palan- 
ca en un angulo determinado, el impulso de control 
debe repetirse a una frecuencia de unos 50 Hz. 

Los servomotores se sue I en emplear para mover 
palancas, etc., pero tambien pueden ser utilizados 
para el movimiento lineal. Si el potenciometro se 
desacopla del tren de engranajes y se centra, el 
motor girara eontinuamente. De hecho. la veloci- 
dad a la cual gira esta determinada por la duration 
del impulso. 

Conexidn al ordenador 

Cuando los servomotores se conectan directamente 
a ia puerta para el usuario de un ordenador, los 
errores en el cableado pueden danar los delicados 
mecanismos internos de la maquina. Por lo tanto 3 
se ha de utilizar un sistema de tampon ami onto, y 
las cajas buffer y de salida que construimos ante- 
rior men tc en este apartado son ideales para este 
fin. Usted debe conectar el cable de la fuente de 
aliment aci on elect rica del motor al conector posit i- 
vo (rojo) de una de las lmeas de la caja de salida de 
bajo voltaje, El cable a tierra comun se debe conec- 
tar al conector negativo (negro). 

Si el cable de control del motor se ha cooectado a 
la lmea de datos 0 de la puerta para el usuario del 
ordenador, entonces se puede controlar el motor 
propiamente dicho enviando a ia Ifnea de datos 0 
de la puerta para el usuario las seeuencias de impul- 
sos apropiadas, Un impulso se en via elevando la 
lmea 0 a 5 V, mediante el almacenamiento de un 1 
binario en la lmea 0. Se utiliza entonces un bucle de 
cuenta hacia atras para esperar el tiempo deseado 
antes de volver a reducir la salida mediante cl alma- 
cenamiento de un 0 binario en la lmea 0. 
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Tanto el BBC Micro como el Commodore 64 uti- 
lizan chips adaptadores para interface versatile^ 
para conformar la puerta para el usuario. Dado que 
una puerta para el usuario se puede emplear tanto 
para entrada como para salida, la que estamos utili- 
2ando se debe establecer primero en la modalidad 
requerida (en este caso, para salida). En ambos mi- 
cros esto se puede realizar manipulando (POKE) di- 
rectamente el registro de control de direccion do 
datos usando basic, 

Ahora debemos considerar como enviar impul- 
sos por una linea de datos de la puerta para el usua- 
rio. Si se colocara (POKE) en esta un valor de 88 
hexadecimal (equivalente al 136 decimal, o a un pa- 
tr6o de bits binario de 1 0001 000). los voltajes de las 
patillas de datos senan: 5 V, 0 V ; 0 V, 0 V, 5 V, 
0 V, 0 V, 0 V respectivamente. Este patron perma- 
neceria constante hasta que fuera modificado deli- 
beradamente, Por consiguiente, se puede generar 
un impulso simple en la linea de datos 0 colocando 
(POKE) hexa 00, hexa 88, hexa 00, 

Para que el impulso sea lo bastante rapido, se 
debe utilizar codigo maquina* El algoritmo para en- 
viar impulsos a un unico servomotor es: 

1) Especificar el anguJo de ia palanca almacenan- 
dolo en un solo byte (llamado ANGULO) con un 
valor entre 0 y 255, utilizando un programa en 

BASIC. 

2) Establecer alta (5 V) la linea de datos 0, comen- 
zando de este modo el impulso. 

3) Esperar un milisegundo mediante bucle y decre- 
mento del contador. 

4) Esperar durante otro periodo de entre 0 y 1 mi- 
lisegundo, nuevamente mediante bucle, pero esta 
vez el valor de partida del contador (y, por tanto, la 
cantidad de iteraciones) es ANGULO. 

5) Poner baja (0 V) la Linea de datos 0 para termi- 
nar el impulso. 

Si ANGULO=0, el impulso durara un periodo de un 
milisegundo; si ANGULO =128 (en el BBC Micro y el 
Commodore 64) durara 1,5 milisegundos y la pa- 
lanca se movera hasta un punto medio. 

Un impulso. no obstante, no es suficicnte para 
mantener la position de un se no motor. Este debe 
feribtr una oorriente de impulsos. refrescando al 
motor aproximadamente cada 20 milisegundos. 
Existen dos maneras de generar una corriente de 
impulsos: 

lj Siraplemente empleando un bucle de espera 
para hacer una pausa entre los impulsos. Esto signi- 
fica que mientras se efectua el bucle el ordenador 
no puede hacer ninguna orra cosa. 
2) Utilizando "intemipciones'\ que permiten que 
el ordenador ejecute otro programa (por lo general 
en basic) casi simultaneamente . Este programa de 
segundo term i no puede sndicar a los mo tores hacia 
donde mo verse. 

Tanto el BBC Micro como el Commodore 64 uti- 
lizan procesadores de la serie 6500 , que poseen dos 
patillas para interrupciones: NMI e IRQ. La segunda, 
la Hue a de interruption, la emplearemos para nues- 
tras tare as de temporizacion. Cada vez que en la 
linea IRQ aparece un impulso, el procesador inte- 
rrumpe lo que este haciendo y comienza a ejecutar 
el programa de tratamiento de interrupciones. Una 
vez completado, retorna (RT[) al mismo punto en 
que se encontraba cuando fue mterrumpido* 

Tanto el BBC Micro como el Commodore 64 uti- 



Tambien sieved.., 



POSICION DE REFER EMC I A 



OESVIACION ANGULAR 




EJE DE R0TACI0N 



La desviacidn del asta fijada a I 
husilio del servomotor esta 
determinada por la duracion 
del Impulso enviado por el 
o rd e nad o r control ado r: 
cuanto mas large es el 
impulso, mayor es la 
desviacidn, Si el impulso se 
repite a intervals de unos 20 
milisegundos, el motor 
mantendra el asta en una 
determinada posicion; este 



"bloqueo de posicion'' hace 
que el servomotor resulte 
ideal para aplicaciones de 
control electromecanico. La 
mayona de los 
microordenadores generan 
interrupciones cada 10 o 20 
milisegundos, de modo que 
esta serial de "refresco" se 
puede enviar sin referenda a 
un programa de control en 
basic, parcheando algo de 



codigo maquina en el sistema 
operative a traves del vector 
de interrupcion. 
Otra ventaja de los 
servomotores es que solo se 
necesita una linea de datos 
para enviar los impulsos de 
control y refresco, de mode 
que a cada servomotor se le 
otorga un solo bit de la puerta 
de datos del ordenador 
controiador 



lizan un sistema de interrupciones para sus sistemas 
operativos. El BBC Micro genera 100 interrupcio- 
nes por segundo (una cada 10 milisegundos) y el 64 
posee un coeftciente de 60 por segundo. A cada 
interrupcion se aetualizan los temporizadores del 
sistema. se explora el teclado. etc. De este modo. 
los sistemas operativos de estas maquinas poseen 
relojes que geoeran interrupciones y poseen. asi- 
mismo. manejadores {handlers) para interceptarlas 
y usarlas. 

En los dos ordenadores, las interrupciones del 
sistema se pueden utilizar para ejecutar el progra- 
ma generator de impulsos. Las interrupciones del 
Commodore 64 deben interceptarse cambiando el 
vector de interrupcion. Este vector (una direccion 
de dos bytes retenida en dos celdas eonsecutivas) le 
dice al procesador la posicion de la rutina que trata 
las interrupciones. Cambiando esta direccion al 
punto de la rutina de impulsos. y dirigiendo al pro- 
cesador otra vez hasta el manejador de interrupcio- 
nes del sistema, al final del impulso, el procesador 
generara un impulso cada vez que se produzca una 
interrupcion: es decin 60 veces por segundo. 

Aquf le ofrecemos las versiones en basic y as- 
sembly de un programa para controlar un solo ser- 
vomotor en el Commodore 64. 
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Control de un solo servomotor mediante el 
Commodore 64 



La primera parte del listado fuente para el control 
de un solo servomotor mediante el Commodore 64 
muestra como se alteran fos vectores de 
interrupcion (posiciones 788 y 789). Esto no se 
puede hacer cJesde.BASic, puesto que durante esta 
alteracion se podria produclr una interrupcion, lo 
que haria que el sistema se co]gara. Observe que 
las interrupciones se inhiben (SEI) mientras se 
produce la alteration y se reactivan utilizando CLI. 
El resto del codigo es la rutina para tratamiento de 
interrupciones para contra lar un servomotor. 
El programa de llamada en basic muestra todo lo 
necesario para cargar las rutinas en codigo 
maquina, prepara la puerta para el usuario y 
despues col oca (POKE) valores en la posicion de 
memoria S3000 (12288) segun la tecla (de 1 a 9) 



Codigo fuente 



MANEJADOR DE UN 
SERVO CBM 



PUERTA= 56579 
ANGULQ = 122B8 



; REG DATOS PUERTA USUARIO 
; POSICION VALOR ANGULO 



SEI 

LDAS0314 
LDXS03C4 
STA $03 C4 
STA $0314 
IDA $0315 
LDX S03C5 
STAS03C5 
STXS0315 

CLI 

RTS 



;APAGAR INTERRUPCIONES 
; VECTOR IRQ EXISTENTE 



;VOLVER A ENGENDER 
INTERRUPCIONES 



. MANEJADOR DE EVENTOS , 



EUCLE 



BUCLE1 



PHP 
PHA 
TYA 
PHA 
TXA 
PHA 

LDA#$FF 
STA PUERTA 
LDY #SFF 

DEY 

BNE BUGLE 
LDY ANGULO 

I 

DEY 

BNE BUCLE1 



;SALVAR R EG I ST R OS 
;EN LA Pi LA 



;BUCLE DEMORA 
;APROX1MSEG 



DESCUENTAIMPULSO 



LDA #$00 

STA PUERTA ;REGISTRO DATOS CERO 



PL A 
TAX 
PLA 
TAY 
PLA 
PLP 

JMPSEA31 



;RESTAURAR REGISTRO 
;VALORES 



que se pulse, Un motor conectado a la puerta para 
el usuario deberia entonces de moverse hasta una 
posicion proportional al valor do la tecla. Pulsando 
E se da por concluida la sesion. Si usted posee un 
ensamblador, entre el listado fuente y ensamblelo 
en un archive objeto que subsiguientemente se 
pueda cargar mediante el programa de llamada en 
basic. De no ser asf , entre el cargador en basic para 
el codigo maquina y ejecutelo para cargar el codigo 
en la memoria, Digite NEW antes de cargar y 
ejecutar el programa. Si utiliza el cargador en basic, 
puede omitir las Ifneas 30 y 40. 
Nota: Si hay afgo mal en un programa que utiliza 
interrupciones, es muy facil que todo el sistema se 
corrompa, Portanto, conviene guardarel 
programa antes de ejecutarlo 

Programa cargador 
en basic 

10 REM **** CARGADOR EN BASIC**** 
20 REM **** PARA UN SOLO SERVO **** 
30 : 

40 FOR 1=820 TO 882 
50 READ A:POKE I , A 
60 CC-CC+A 
70 NEXT I 

SO READ CS:IF CCoCS THEN PRINT 

"ERROR EN SUMA DE CONTROL' 1 :ST0P 
100 DATA120. 173.20.3. 174, 196,3. 141,196 
110 DATA3,141 ,20,3,173,21 ,3,174,197,3 
120 DATA! 41 , 1 97.3 , 142, 21 ,3,88,96,8 ,72 
130 DATA152.72, 138,72,169,255,141 ,3 
140 DATA221 ,160,255,1 36,208,253,1 72,0 
150 DATA48,136,208,253,169 1 0, 141 ,3,221 
160 DATA1 04 , 1 70, 1 04 ,1 68 , 1 04,40,76,49 
170 DATA234 

180 DATA71 70:REM *SUMA DE CONTROL* 



Programa de 
llamada en basic 

10 REM **** UN SOLO SERVOMOTOR **** 
20 : 

30 DN=8:REM SI CASSETTE ENTONCES 
DN=1 

40 IF A=0 THEN A=1;L0AD 

"SINGSERV.HEX" 1 8,1 
50 POKE 964,79:POKE 965,3:REM APUNTAR 

A MANEJADOR IRQ 
60 RDD = 56577:POKE RDD.255 REM TODAS 

SALI DA 

70 MC=820:SYS MC:REM ESTABLECER 

VECTOR IRQ 
80 POKE 53265, PEEK(53265]AND239:REM 

BORRAR PANTALLA 

90 : 

100 GET KS:IF K$=" " THEN100:REM 

ESPERAR PULSACION TECLA 
110 REM ** ALTERAR POSICION MOTOR ** 
120 I F ASC(K$)>48 ANO ASC(K$)<58 TH EN 

POKE 1 2288, VAL(K$)* 20 
130 IF KSo'E" THEN 80:REM "E" PARA 

SALIR 
140 END 
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Formas simetricas 



El logo es un lenguaje particuiarmente util para la investigacion de 
patrones y simetrias 



Existen cuatro clases de tmnsformacidn que pode- 
mos aplicar a una figura bidimensional sin que su 
forma sufra ninguna modification (aunque podria 
variar su position). Estas transform aciones son: 
traslacion, rotation, reflexion y reflexion con desli- 
zamiento. Nuestro diagrama refleja como cambia 
la position de una forma en funcion de cada una de 
estas transformaciones. 

Se dice que una figura es simetrica si po demos 
transformarla en una o m£s de estas formas y dejar 
inaiieradas tanto su posicion como su forma. Las 
formas finitas (como los poligonos y las letras del 
alfabeto I deben tener simetrias basadas en la refle- 
xion y la rotation, ya que las traslaciones y las refle- 
xiones de deslizamiento carabiaran sirs positioaes. 

Para investigar estas simetrias resulta util tener 
procedimientos en logo para hacer refkjar y rotar 
formas. Comenzaremos por analizar la tarea de re- 
flejar una forma en una linea que pase por el origen 
y posea una orientation dada. 

Es mas sencillo si damos por sentado que el pro- 
cedimiento para dibujar la forma es de estado 
transparente (es decir, deja a la tortuga en la misma 
posicion y con la misma orientacion que tenia antes 
de que se ejecutara el procedimiento), Nuestra 
tarea se divide entonces en dos partes; primero, 
hemos de hallar las coordenadas y la orientacion 
del pun to de parti da de la reflexion que correspon- 
da al punto de partida de la forma original. Es ne- 
cesario llevar a cabo la segunda tarea antes de em- 
pezar a dibujar la forma. La misma supone cambia r 
todos los giros hacia la derecha del procedimiento 
para dibujar la forma por giros hacia la izquierda, y 
todos los giros hacia la izquierda por giros hacia la 
derecha. Una manera de hacerlo consiste en reem- 
plazax todas las RT y LT del procedimiento mediante 
un procedhniento llamado GIRO, defimdo de la si- 

TO GIRO A 

RT :DIR* A 
END 

De modo que ahora podemos definir un cuadrado 
como: 

REPEAT 4 [FD 50 GIRO 90] 

Para utilizar este procedimiento debemos primer o 
poner a 1 la variable local DIR. Por lo tanto, MAKE 
"DIR 1 CUADRADO dibujara un cuadrado. Para re- 
fie far el cuadrado en el eje, todo lo que hay que 
hacer es digitar MAKE "DIR (-1) y luego CUADRADO. 
Pruebelo y vea lo que sucede. 

El procedimiento para posicionar la tortuga 
antes de dibujar la reflexion depende en cierta me- 
dida de la trigonornetria: 

TO REFLEJAR :A 
MAKE "0 ORIENTACION 



MAKE "XANT XCOR 

MAKE "ANGULO (ATAN :YANT :XANT)-90+:A 
MAKE "R SORT (:XANT*:XANT-J-:YANT*:YANT) 
PU 

SETXY0 0 

SETH :A + :A(MGUL0 

FD :R 

SETH 2* :A+:H 
PD 

MAKE "DIR :DIR*H) 
END 

Ahora este procedimiento se puede utilizar para 
ver el efecto de reflexiones en varias llneas a traves 
del origen. Pruebe con: 

MAKE *DIR 1 

PU SETXY 40 70 PD 

CUADRADO 

REFLEJAR 60 

CUADRADO 

Si la forma reflejada se haila completamente en la 
parte superior del original, se dice que posee una 
"simetria reflexiva", respecto a esa linea. Pruebe 
con; 

MAKE "DIR 1 
PU SETXY 0 0 PD 
CUADRADO 
REFLEJAR 45 
CUADRADO 

Se podria escribir un procedimiento similar para 
hacer girar una forma respecto a un punto dado a 
traves de un angulo dado, pero eso lo dejaremos 
para que lo escriba usted mismo, 

Algunos patrones, como los de los papeles pinta- 
dos, utilizan en su diserio la misma forma repetida- 
mente. Se pueden efecniar traslaciones y reflexio- 
nes con despl&zamiento que muevan el patr6n en- 
ters? \\ aun asL lo dejen exactamente tal como esta- 
ba. Por el momento nos concentraremos en patro- 
nes que impliquen traslaciones a lo largo de una 
unica linea. dejando los patrones bidimensionales 
para el proximo capitulo. 

Las combinaciones de las cuatro transformacio- 
nes fundamentals dan origen a apenas siefe tipos 
de patrones sobre una linea recta, Todas estas posi- 
bilidades se muestran en nuestro segundo diagrama 
en forma de un simple motivo "PATA", Hemos 
construido procedimientos para dibujar los siete 
patrones a partir de cualquier MOTIVO empleando 
los procedimientos MOVER para traslacidn, GIRAR 
para rotation, e I. MOTIVO, que convierte todos los 
giros RT de MOTIVO en giros LL v todos los giros LT 
en RT. 

Hemos utilizado las fatilidades para proceso de 
list as del logo para escribir el procedimiento I . MO- 
TIVO reescribiendo MOTIVO. El procedimiento que 
empleamos para hacer esto es: 
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TO REESCRIBIR :PROC 

OUTPUT REESCR1BIR.PRQC TEXT 
END 
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Transforms clones isomfrricas 

Las transformaciones que 
alteran la posicirin de un objeto 
pero no su forma sellaman 
isometrias. Existen cuatro tipos 
b^sicos de transformaciones 
i$om6tricas: traslacion, 
rotacibn, reflexion y reffexl6n 
con deslizamiento. La traslacion 
es un simple ''deslizamiento'' de 
la figura original. La rotation 
hace girar la forma ai rede dor de 
algun punto central 
especificado. La reflexion 
implica el movimiento de puntos 
a traces de una linea de espejo, 
de mo do que cada punto-de la 
forma final este a la misma 
distanciahaciaun ladode la 
linea que el punto 
correspondiente del original 
hacia el otro lado. La reflexibn 
con deslizamiento e$ una 
reflexion y una traslacion. 
Mientras que la traslacion y la 
rotacion conservan el "sentido 
la reflexion y la reflexion con 
deslizamiento lo cambian: 
imaginese, por ejemplo, una 
palabra reflejada en un espejo 



REESCRIBIR toma el texto de un procedimiento es- 
pecificado, lo modifica y lo crea bajo otro nombre. 
Da por sentado que el procedimiento sobre el cual 
esta trabajando esta escrito con primitivas del logo 
y no contiene ningun subprocedimiento. REESCRI- 
BIR contiene una liamada a los siguientes proeedi- 
mientos: 

TO REESCR1BIR.PR0C :TEXT0 
IF :TEXT0 = [ ] THEN OUTPUT [ ] 
OUTPUT FPUT REESCRIBIR1INEA FIRST :TEXT0 
REESCRIBIR.PROC BUTFIRST :TEXT0 

END 

Este procedimiento divide la tarea de reescribir el 
procedimiento de entrada en imeas individuates, 
mediante la liamada al siguiente procedimiento: 

TO REESCRIBIR II NEA : LINEA 
IF :LINEA=[ ] THEN OUTPUT [ ] 
IF LIST? FIRST ;LIMEA THEN OUTPUT FPUT 
REESCRI8IR1INEA FIRST :LINEA REESCRIBIR. 
LINEA 

BUTFJRST : LINEA 
OUTPUT FPUT 

CAIVJBIAR. PALABRA FIRST : LINEA 
REESCRIBIR. LINEA BUTFIRST : LINEA 
END 

REESCRIBIR II NEA realiza el proceso de cada linea, 
pasandole las palabras individuates a CAMBIAR, PA- 
LABRA para que esta se encargue de ellas. La linea 
que comienza con IF LIST? es necesaria para tratar 
con una situation en la que MOTIVO contenga una 
sentencia REPEAT. Si usted no utiiiza esta sentencia 
en sus procedimientos MOTIVO, entonces si puede 



Reflexion 




eliminar la linea de este procedimiento. El listado 
para CAMBIAR. PALABRA es: 

TO CAMBIAR, PALABRA ;PALABRA 

IF (ANYOF ;PALABRA=" RT :PALABRA= 
'RIGHT) THEN OUTPUT "LEFT 
IF (ANYOF : PALABRA -'IT :PALABRA= 
"LEFT) THEN OUTPUT BRIGHT 
OUTPUT :PALABRA 

END 

Este procedimiento verifica cada palabra individual 
y realiza las modificaciones necesarias, Habiendo 
entrado todos estos procedimientos, veamos ahora 
coma funcionan. En primer lugar, es preciso definir 
una forma simple, como por ejemplo: 

TOTRI 

REPEAT 3 [FD 50 RT 120] 
END 

Ahora entre DEFINE "REF REESCRIBIR "TRI. y llame 
a REF + Su definition ha de ser: 

TO REF 

REPEAT 3 [FD 50 LEFT 120] 
END 

Es bastante factible escribir un procedimiento 
REESCRIBIR mas general que tambien reescriba 
cualquier procedimiento Ilamado por el procedi- 
miento principal. Si interna escribirlo, jtenga cuida- 
do con los procedimientos recursivos! Tambien ne- 
cesitara poder comprobar si una palabra es el nom- 
bre de un procedimiento. 

Los siete patrones de f ranjas 

Sena posible (y elegante desde e! punto de vista 
matematico) co'nstruir los patrones a partir de pro- 
cedimientos para las cuatro transformaciones basi- 
cas. Los procedimientos para dibujar patrones 
hacen uso de estos tres procedimientos auxiliares: 

TO POSICION 
HT 

PU 

SETXY - 125 0 
PD 
END 

Este posiciona la tortuga en e) lado izquierdo de la 
pantalla, lista para empezar a dibujar. 

TO MOVER 
PU 

RT 90 
FD 50 
LT90 
PD 
END 

MOVER realiza la traslacion requerida. 

TO GIRAR 
RT 180 
EMD 

GIRAR efectua ia rotacion que necesitamos. 

Para utilizar estos procedimientos defina primero 
un procedimiento de forma (digamos, FORMA) que 
sea de estado transparente y que no incluya llama- 
das a subprocedimientos. Dcspues ya puede di- 
bujar el primer patron empleando FORMA como su 
motive, entrando PATRON 1 " FORMA. 
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Ian McKinnell 



LOGO/Ciencia inf ormatica 



m 



Logomotivo 



TRASLACION 



s 'etepatronesdefra n /as 

Posibles son: y G ' RAR - Los siete patrones 

TO PATRON 1 :Proc 

p°osSn MOWotw ^oc 

EN gEPEAT6fM0TIVb MOVER] 
TO PATR0N2 .PROC 



TO*T PROC ' REESCR! B'R.PROC 

TO PATR0N3 :PR0C 
& E -, M0TfV °TOXT-PR0C 

■ PROC 

POSICION 

ENT m6mTi ^IM0TlV0 MOVER] 

TO PATR0N4 PRoc 
DEFINE "MOTIVO TEXT PRnr 

™e r tmot,voreesS r 

• PROC 

POSICION 



HR.PROC 




TO PATR0N6 :PR0C 
POSICION 

TO PATRON? ;PROC 

POS/CION 
END I VO GIRAR MOVER] 

PD50 

RT90 

TO 20 
BK20 
LT90 
BK50 
END 

Unmotivoalternalivoes- 
TO FIG 
RT30 
TO 20 
LT50 
TO 20 
RT90 
FD 10 

|P«T 4fFD20fiT 

LT90 
BK'20 
RTSfl 
3K20 
U30 
9» 



ff[ 



REFLEXION CON 
DESLfZAMIENTO 





DOS REFLEXIONES 



Til 



TRASLACION Y ROTACION 




REFLEXION YROTACION 



f f 



TRASLACION Y REFLEXION 



Oomplemenfos al loco 

ATAN y TOWARDS no existen en el logo Atari, ni 
tampoco existe un recambio sencillo. E!!o incide en 
los procedimientos REFLEXION y ROTACION, pero 
no en los PATRON . 

El logo Atari no posee TEXT ni DEFINE como 
primitivas, si bfen el manual ofrece un meiodo para 
definirlas. Usted puede escnbir I. MOTIVO 
rnodificando MOTIVO mediante el editor 
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TRASLACION Y 
DOS REFLEXIONES 



it n 



Siete de Ea misma clase ^ _ _ _ _ 

Las cuatro trarrsformaciones 



Las cuatro tra reformatio 
isometricas primitivas se 
pueden combinar de diversas 
formas para prod ucir siete 
patrones exclusivos, tal como 
vemos en la ilust racion . En 
cada caso partinos del motive 
"pata'ytpdas las 
trasiaciones se efectiian en la 
direction del eje* 
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Lenguaje maquina/Pantallas alternativas 




Jaque al chip 

En el Commodore 64 es facil reubicar posiciones de memoria. Lo 
demostraremos con una rutina para disenar y almacenar un 
maxirno de ocho visualizaciones 



Panorama VIC 

El chip controlador de video 
(VIC) del Commodore 64 puede 
"ver" 16 K de memoria. 
Generalmente se trata de los 
primeros 16 K, del $0000 al 
S3FFF t pero puede tiacerse que 
"mire" hacia cualquier otro de 
lostresbloques de 16 K, 
alterando el contenido de uno de 
los registros de control del VIC, 
El programa "Pantallas 
alternativas" esta Piece hasta 
nueve mapas de pantalla dentro 
del area normal de 16 K que 
puede ver el chip. Los mapas 
correspondientes a cad a pan tall a 
seencuentran en el area de la 
RAM que esta justo end ma del 
area vista por el VIC, 
disponiendo cada pantalla, salvo 
la pantalla 0, de un 
des plaza miento constante de 
$2400 respecto a su ma pa de 
color 



En el Commodore 64, un chip especial controla la 
visualization y el tratamiento de sprites. Es el chip 
denominado VIC II . El chip VIC accede a diversos 
sectores de la memoria para obtener information 
util para crear la visualization que se nos presents 
en la pantalla. Esta* areas incluyen la ROM de ca- 
racteres, que contiene la forma del trazado de los 
caracteres; la RAM del color, que guarda la Infor- 
mation del color en pantalla, y la RAM de la pan- 
talla. Esta ultima contiene information de los ca- 
racteres que puede n visualizarse en las 1 000 posi- 
ciones {25 filas por 40 columnas) que constituyen el 
espatio de la pantalla. 

En el momento de conectar el Commodore 64, el 
chip VIC sup one que la pantalla esta posicionada 
en esos 1 000 bytes que comienzan en la position 
1024 ($0400) y accede a esta area para buscar la 
information initial de la pantalla. Pero si se altera 
el valor de un registro dentro del chip VIC es posi- 
ble redireccionar el citado chip a otra zona de me- 
moria, normalniente efi los primeros 16 K de la me- 
moria. Los cuatro bits superiores del registro de 
control en el VIC se encuentran en la position 
53272 ($0018) y determinan el bloque de K que ha 
de ser tornado como la pantalla , dentro de la citada 
area de 16 K, He aqui un cuadro que ilustra los 



valores de los bits que corresponden a cada una de 
las 16 posibles posiciones de pantalla: 
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LO QUE VE 
NORMAL- - 
MENTE 

EL VIC 



S4000 
S3C00 
S3800 
S3400 
S30OO 
S2C00 
$2800 
S2400 
$2000 



■ ■ ■ ■ 

. ' M V 



S0800 
$0400 
$0000 




I $6400 

$6000 

S5C00 

S5300 

$5400 

$5000 

$4000 

$4800 
I S4400 

mooL 



-AREA DE DAT0S 
DEL COLOR 



■ PANTALLAS 
ALTER NAT. 




DESPLAZ. DEL 
AREA DE LA 
iPANTALLA 
A LA DEL 
COLOR =$2400 



_ AREA DE PROG RAM AS 
BASIC {6 K) 



PANTALLA HABITUAL 



Patron de bits 


Inicio [ 


lantaila 


UUUUAAAA 


u 


cnnnn 


0001 xxxx 


1024 


$0400 * 


0010XXXX 


2048 


S0800 


0011 xxxx 


3072 


socoo 


0100XXXX 


4096 


$1000 


01 01 xxxx 


5120 


$1400 


0110XXXX 


6144 


$1800 


0111XXXX 


7168 


S1C00 


1000XXXX 


8192 


$2000 


1001 xxxx 


9216 


$2400 


1010XXXX 


10240 


$2800 


1011 xxxx 


11264 


$2C00 


1100XXXX 


12288 


$3000 


1101 XXXX 


13312 


$3400 


1110XXXX 


14336 


$3800 


1111XXXX 


15360 


S3C0O 



"=Posicidn por defecto 

Para que el chip VIC traslade la pantalla a otra 
area, hemos de cambiar los cuatro bits superiores 
de la position 53272 (SD018) por los valores indica- 
dos en este cuadro, Los cuatro bits inferiores no 
deben ser modificados (los hemos indicado con 
XXXX), pues control an otra funclom Para poner a 
cero los cuatro bits superiores sin cambiar el valor 
de los inferiores, debemos operar el contenido del 
registro con un AND 16gico empleando el numero 
15 (00001111 en binario). Una vez hecho esto ope- 
raremos con OR el nuevo contenido del registro 
empleando el valor que deseamos. Para colocar la 
pantalla en la ultima area que el chip puede ver (es 
decir, la que comienza en 15360, o sea, S3C00), ha- 
bremos de emplear un OR con el contenido del re- 
gistro y el numero 240 (binario, 11110000). En 
basic se encarga de to do esto la sigiriente instruc- 
tion POKE: 

POKE 53272 r (PEEK(53272)AND15)0R24G 

Antes de poder escribir algo en nuestra nueva pan- 
talla, tendremos tambien que decide al sistema 
operativo del Commodore 64 que la position de la 
pantalla fue alterada, Lo que conseguimos colocan- 
do el byte hi de la nueva direction de initio de la 
pantalla en la position 648 ($0288). Para la pantalla 
mas alta resulta ser $3C. y se obtiene fatilmente en 
basic dividiendo por 256 la direction de initio de 
pantalla. 

Una vez cambiado el contenido de estos dos re- 
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Pantallas alternativas/Lenguaje maquina 



gistros podemos haccr uso de la nueva pantalla 
como si nada hubiera ocurrido. Observe que si hu- 
biera que cambiar la position de la pant alia en 
basic habria que escribir un pequeno program a 
para hacerlo, 

Es posible hacer uso de la facilidad con que en un 
Commodore 64 puede moverse la pantalla para ob- 
teuer varias utilidades de interes. En concreto, po- 
demos cambiar la visualizacion con rapidez y sin 
dificultad. Solo que si deseamos mover la pantalla 
hay que mover tambien la RAM correspondiente 
del color, ya que la visualizacion quedara sin gra- 
tia, faltandole los datos adecuados de la RAM del 
color. A pesar de que podemos establecer varias 
areas dentro de fa memoria y cambiarlas para pan- 
talla, solo se dispone de una inamovible area RAM 
del color } lo que signifies que, para retener varias 
visualizations individuates de pantalla, debemos 
reservar zonas de memoria capaees de contener los 
1 000 bytes de datos de color para cada pantalla. 
Cuando se desea visualizar una pantalla hay que 
copiar la information en la RAM del color y guar- 
dar los datos en una de las areas de la memoria 
escogidas para albergar la RAM del color, antes de 
cambiar a otra pantalla diferente 

Organizacidn de ta memoria 

La tarea principal de esta utilidad es organizar la 
memoria para pantallas alternas (junto con sus co- 
rrespond ientes areas para datos del color), y reali- 
zar la transferencia de bloques de memoria. Dado 
que el chip VIC puede "ver" 16 K de memoria, 
podemos disenar un si sterna que nos permita dispo- 
ner hasta de ocho pantallas diferentes y un progra- 
ma basic a medida, En un diagrama ad junto hemos 
ilustrado la organization de la memoria que emplea 
la utilidad, 

Para estar seguros de que no va a ser machacada 
ningiin area de pantalla o de color a causa de algun 
programa basic, debemos bajar la frontera superior 
de la memoria basic. Esto lo hace la siguiente ins- 
truction en nuestro programa en basic: 

POKE 55 r 0:P0KE 56.32:CLR 

La direction de base de cualquier pantalla se calcu- 
la a partir de su numero me di ante esta formula: 

Base pantalla = SI COO - (SHOO* Numero pantalla) 

La direction de base de la correspondiente area del 
color se calculara anadiendo un desplazainiento a ta 
direction de base de la pantalla. La formula es: 

Base color = S2400 + Base pantalla 

Las areas del color pueden ubicarse en cualquier 
lugar de la RAM, pero es recomendable colocarlas 
jus to encima de la ultima pantalla visible para el 
chip VIC. Observe que esta inciuida un area de 
color para la pantalla 0, que es la pantalla habitual. 
Para esta particular area de color, el desplazaniien- 
to ha de ser diferente y debera* ser ten i do en cuenta 
en nuestro programa, El registro de control del 
VIC y el registro del si stem a operativo pucden esta- 
blecerse para cualquier pantalla mcdiante: 

Registro VIC = $70 + ($10* Numero pantalla) 
Registro OS = Byte HI de la direccion base de pantalla 

Ademas, para manejar el establecimiento de regis - 
tros v realkar las transferencias adecuadas de los 



datos de color desde y hacia el area de RAM de 
color, el programa almacena tambien el color del 
fondo y el borde o recuadro de la pantalla. Estas 
dos t areas se controlan mediante un par de regis- 
tros en el chip VIC: 53280 (SD020) controla el color 
del borde o recuadro (border) y 53281 ($D021) con- 
trola el color del fondo de la pantalla (paper). La 
utilidad establece una tabla dentro de su area para 
almacenar estos atributos para cada pantalla. 

Modos operativos 

La utilidad tiene dos modos de operar; puede edi- 
tar(edit) o visualizar (display) una pantalla seleceio- 
nada. En cada caso el numero de pantalla a em- 
plear debe colocarse (POKE) en 49152 (SCO00). Para 
conseguir que sea la misma llamada SYS nos scrvi- 
mos de un flag especial que indicara cual ha sido el 
modo escogido, Este flag sc col oca (POKE) en la 
posicion 49153 (SC001). 

0: indica eJ mode visualizacion 
1: indica el modo edition 

El modo edicion funciona de forma poco habitual, 
para coder emplear todas las facilidades del editor 
de pantalla (como cambio de color de texto, esta- 
blecimiento de modo invertido y borrado de panta- 
lla). La utilidad debe ser llamada antes y poner a 1 
cl flag de edicion. Despues guardara el area de 
color normal de pantalla y ios colores de papel y 
recuadro, pondra el valor adecuado en los registrar 
del sistema operativo y del VIC. En este punto, e! 
programa en basic de llamada toma el control po- 
niendo el cursor en su initio y empleando la instruc- 
tion INPUT del basic Esta instruction esperara un 
caracter de retorno {13 en ASCII) antes de prose- 
guir. Mientras, todas las funciones del editor dc 
pantalla pueden ser usadas de la manera habitual 
para editar la pantalla seleccionada; cuando la 
tarea este concluida sc pulsara Return, 

El programa basic debe posteriormente 11a mar 
por segunda vez a la utilidad, pero en esta ocasion 
el flag de edition se pone a 2. Esto hace que se 
guarden los datos del color y los colores del fondo- 
/borde de la pantalla con los que se ha trabajado 
antes de restablecer la pantalla habitual. Si se desea 
cambiar el color del borde o del fondo, estos colo- 
res deben colocarse (POKE) en las posiciones 49154 
(SC002) y 49155 (5C0G3) respecfivamente. Aunque 
la mtma esta disenada para esta tarea concreta, in- 
corpora ademas rutinas generales para establecer 
regisrxos de control y copiar los datos desde o hacia 
la RAM del color. No le sera, por tanto. difJcil 
idear una utilidad para sus propias espetificationes 
partiendo de las rutinas generales. 

El programa de llamada en basic esta disefiado 
para visualizar un menu que de la posibilidad de 
editar o visualizar. La rutina de visualization llama 
a cada una de las ocho pantallas diferentes secuen- 
cialmente y respondiendo a pulsationes del tecla- 
do. Las pantallas seguiran rotando hasta que se 
pulse la tecla Return. Entonces se restaurara la 
pantalla normal y se vol vera al menu. Si se escoge 
la option de edicion. el usuario puede establecer 
los colores del fondo y del recuadro para la pantalla 
escogida, y puede servirse del editor de pantalla de 
la manera habitual para modificar el contenido de 
esta. Una vez concluido, Return hace que el cuadro 
se almacene y se restablezca la pantalla normal. 





Guardar RAM de 
cofor en irea 
color pant. 0 




Guardar en 
labia colores 
borde/iomfo 




Caleular dins, de 
base del area 
de color y pant. 



Establecer 
reg. VIC y OS 







Cargar datos 
de color pant, 
actual RAM t 



Guardar en tabla 
fondo "horde 
actual 



IF 



Guardar HAM de 
en i r z2 datos 




Resiaoiecer regs. 
VEC y OS para 
exam, pant. D 




Restablecer cols, 
londcvborde con 
entr. 0 labia 




Cargar datos 
color pant. 0 
en RAM color 



C SAUDA \ 
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Cargador de basic 



:e basic para 
alternativas 




: "*\=R I NT" CHECKSUM ERR0R":ST0P 

: -r m :», 0.255 
■■ : : 255.191,0 
5.0,173,1 
: .=£9.0.141 .6 
=2. 32. 224 
i -32.173.2.192 
1.773.3. T92, 14 1,33 
3 6.32.32,193 
141.4.192,141 

tmm.s. 192,24 

0.24,105,28 
t." 05.36.1 4 1.7. 192 
L4.t 0.202 .208.252 
LTJ 18 .192, 173,24 
=.T3.8. 192. 141 .24.206 
L-lV 136.2, 173.1. 192 
HS2.32.21 1,1 92. 201 
i9. 192.96, 174.0 
2.32,224,192,32 
9.141,6,192,109,64 
L '52.0.32, 21 1,192,32 
5.173.6,192,133,251 
r.mi33,252.169.0.133 
H6.133 ( 254,32,3.193 
K.mS.192 .141,32 ,203,1 89, 1 8 
««1.33 203.96,173.6,192 
PLU53.173J,192.133,254,169 
Ll33^5l.ie9,2l6,l33,252,32.3 

r: -".32,203.157,9,192 
OlSmi 57. 1 8. 1 92 . 96. 1 $2, 3 
£ I" 77. 251, 145.253, 136, 208 
3.252.230.254,202,48,10 
J. 177 .251. 145,253, 160 
3.232.96 

m ■BJOBBQ&REM* CHECKSUM* 

Pantallas alternativas 



1572 IFXS=CHR$(13) THEN 1 580: REM PANfALLA HABITUAL 
1575 SN=SN+1:IFSN<9 THEN 1555 
1577 SN=1: GOTO 1555 
1580 POKESCNUMB.QiSYSALT 
1600 RETURN 

Commodore 64 

+++++++++++++++++++ 
+++++++++++++++++++ 

+ + PANTALLAS 4-+ 

+ + ALTERNATIVAS + + 
++ PARA EL GBM 64 + + 
+++++++++++++++++++ 

+ +++ + + + + + Hr + -f + i- + -r+-r + 



STA VICREG 



LDA&CBASE+1 
STA EDREG 



;EST REG VIC 



;EST REG EDITOR 



;■ 1 " COMPROBACION ESTAOO FLAG EOJCION 
TESTFG 

LDA EDITFG 

BNE NOLOAD ;SI 0 MODO VISUAUZ 

LDX SCNUMB 

JSH LOADBP :CARGA W EN REGS 



KQiflAG 



CMP #$02 
BEG CONT 



:SI2ENTONCE$GUAROA RAM 
CARGA COLOR EN GRAM 



-IV ' 
:=V ■ 

! REM 



PANTALLAS ALTERNATIVAS 



■-I 
K 
TJi 
210 
220 

:;: 



D*=8:REM PARA CASSETTE DN= 1 
FA=0 THEN A-110AD "ALT SCREENS, HEX", DM,1 ■ 
^^55 . 0: POKE56.32: CLRiREM BAJA FRGNTERAMEMORIA 
SOftJMB=49152: REM NUMERO PANTALLA (SCREEN) 
EDiTF6=49153: REM 0=Vr$UALI2A PANTALLA 

REM 1- EDITA PANTALLA 

REM 2=COPIA RAM COLOR 
ALT =491 79: REM D1RECCION INICIO EN COD MAO 
SROCOL=49154REM COLOR BORDE 
PA?C0L=49l55flEM COLOR FONDO (PAPER) 



■ MENU PRINCIPAL ' 



PRWTCHRS( 1 47): REM LIMPIA PANTALLA 
PRINTCHRS(154):REM LETRAS AZULES LT 
DN$= " H :REM Q =GARACT CU RSOR ABAJO 
PRIN7TAB(8);DNIf CBM64 PANTALLAS ALTERN" 

PRINTTAB(6); " 

" '. AB 5 :U'JS;"F1 — EDITA DIBLUO* 
FfllNT7AB(5j;DN$-"F3 — VISUAU2A SECUENClA DlBUJO" 

GETAS:IFAS=" " THEN 210: REM ESPERA PULSACIONTECLA 
tfAS=" - THEN GOSUB 1000 
IFAS=- 'THEN GOSUB 1500 
GOT0 100 



' EDITA PANTALLA * 



1 Y. 
1100 



EF=lREM ACTIVA MODO EOICION 
PSNTCHfi$(147) 

fflKttABflGfcDNSf MODO EDICION" 
PfWTDHS; INPUT" NUM. PANTALLA" :SNS 
tfA5CjSNS}<46 OR ASC(SN$)>56 THEN 1030 
PRjjfF DNS: ziNPUT "COLOR BORDES ;6C£ 
SfVAU'SCSJ-OAND BCJo'O" THEN 1060 
PRINT DNS: INPUT "COLOR FDND0";PCS 
IFVAL/PCS)=0 AND PC|<> "0" THEN 1080 



1110 POKEEDnT-G.EF 
1120 POKESCNUMB.VAL(SNS) 
1130 POKEBRDCOL.VAL(BCS) 
1140 POKE PAPCOL. VALfPCS) 

1155 REM " ESPERA RETURN " 

1162 INPUT " ';XS;HEM 5=CUR50R EN INICIO 

1165 REM " GUARDA PANTALLA" 

1170 EF=2 

1175 POKE EDITFG .EF 

1130 SYS ALT 

1185 RETURN 

1190 : 

1500 REM VISUAUZA PANTALLA 

1510 EF-0 

1520 PRINTCHRS(147J 
1545 SN=1 
1550 POKE EDITFG.EF 
1555 POKE SCNUMB,SN 
1560 SYS ALT 

1570 GET X$: EFXS= " " THEN157Q:REM ESPERA PULSACION TECLA 



FROM =$FB 


:PAGINA0 


RTS 




TO =SFD 


:PUNTEROS 










CONT 




CRAMLO-S00 


JNICtO RAM COLOR {CRAM) 


LDX SCNUMB 




CRAMHI=S08 


JSR SAVEBP 


;GUAROAREGSBP 


NCOLLO=SO0 


; CO LOR HABITUAL 


JSR SAVE 


;GUAROA CRAM EN COL 


NCOLHI= S40 


;D1RECCtONBASE 


JSR RESET 


:EST REGS NORMALES 


NSCRHI = S04 


:OIR BASE PANTALLA HABITUAL 


LDA #NCOLLO 




NVCPOK=S10 


:VALOR HABrrUAL REG VIC 


STA CLBASE 


"CARGA CBASE CON BASE CO 






LDA ^ NCOLHI 




BLOCKS = SB3 


:NUM DE BLOQUES DE 256 BYTES 


STA CLBASE+1 




EXTRA =SE7 


;CANT EXTRA DE 1000 BYTES 


LDX^SOO 








JSRLOAOBP 


;RECARGA COLORES I NIC BORDE'FQNOO 


C0LOFF= S24 


;BYTE HI DES PL COLOR 


JSR LOAD 


;CARGA COLO RES PANT NORMAL 


SCR0FF-- SIC 


:BYTE HI DES PL PANTALLA 


RTS 


VJC0FF= $70 


;DE$PL REG CONTROL DEL VIC 






VCMASK=SOF 


MASCARA BYTE LO REG CONTROL VJC 


,"~ $M DE TRANSFERENCE A LA RAM 


VICREG = SD018 


;REG CONTROL POSICIONPANT 


LOAD 




EDREG=S0286 


;R£G NUCLEO EDICION PANT 


LDA CLBASE 




BO ROER =30020 


;REG COLOR BORDE 


STA FROM 


:CARGA PUNTEROS PAGINAO 


PAPER =JD92l 


; REG COLO RFONDO 


LDA CLBASE+1 








STA FROM + 1 




; =scooo 


;EST PUNTERO CARGA 










LDA#CRAMLO 




SCNUMB -=>+1 


■NUMERO PANTALLA 


STA TO 




EDITFG 


:FLAG MODO EDICION 


LDA #CRAMHl 




BRDCOL '.-*+1 


COLOR BORDE 


STATO+1 




PAPCOL '=* + \ 


COLOR FONDO 










JSR COPY 


;COPIA AREA RAM 


SCBASE *«"+2 


;ALMAC BASE PANTALLA 


RTS 




CLBASE "="+2 


;ALMAC BASE COLOR 


S/R DE CARGA COLS. BORDE.+TJNDO ' 


VPOKE '=-+1 


:ALMAC PROVIS PARA NUMERO VIC 






BRDTAB * = *+9 


JABLA COLORES BORDE 


LDA BRDTAB.X 




PAPTAB * = *+9 


JABLA COLO RES FONDO 


STA BORDER 








LDA PAPTAB. X 








STA PAPER 




LDA EDITFG 




RTS 




CMP #$01 


;SI ES0OB1EN2 






BNE CALC 


:ENTONCES NOSE GUARDA 


:""Svfi DE TPANSFERENCIA DESDE RAM 






SAVE 




LDA #NCCLL0 




LDA CLBASE 




STA CLBASE 




STA TO 


:CARGA PUNTEROS PAGO 


LDA #NC0LH1 




LOA CLBASE+1 




STA CLBASE+1 




STATO+1 




JSR SAVE 


:G UARDA CRAM EN CO 










LDA^CRAMLO 




L0X#SQO 




STA FROM 




JSR SAVEBP 


^(JAROA Ft£6tSTftOS ap 


LDA *CRAMHI 








STAFROM^I 




LDA BRDCOL 








r- :~-~.~z- 


ir~-A\z ..me i '- 


JSR COPY 


COPSA AREA RAM 


LDA PAPCOL 


::.:=:; 


RTS 




STA PAPER 












;""SflDE ALMAC COLORES BtiRDE/FGNDO 






SAVSBP 








LDA BORDER 




CALC 




STA BRDTAB. X 




LDA SCNUMB 




LOA PAPER 




BNE NOZERO 




STA PAPTAB, X 




JSR RESET 


;EST REGISTROS NOR MALES 


RTS 




JMPTESTIFG 
















NOZERO 








LDA r*SG0 




COPY 




STA SCBASE 




LDX #8L0CKS 




STA SCBASE +1 


;INICI0 BASE PANT 


LDY #S00 








NEXT 




LDX SCNUMB 


:CAflGA MUM PANTALLA 


LDA (FR0M),Y 




LDA SCBASE +1 


;S0L0 BYTE HI 


STA(TO).Y 




MULT 




DEY 




cue 




BNE NEXT 




ADC #104 




NXBLOC 




DEX 




INC FROM 1 1 




BNE M JLT 




INC TO 4 1 








DEX 




CLC 




SMI FINISH 




ADC #SCROFF 


:SUMA DESPL PANTALLA 


BNE NEXT 




STA SCBASE + 




LDA (FROM) ,Y 








STA|T0),Y 




cue 




LDY # EXTRA 


;BYTES EXTRA 


ADC #C0L0FF 


;SU MA DESPL COLOR 


BNE NEXT 




STA CLBASE+1 




FINISH 








RTS 












LOA SCNUMB 




; S/R REST REGS VIC V EDICION " * ' 


LDX #S04 




RESET 




MORE 




LDA#NCOLLO 




ASLA 




STA CLBASE 




DEX 




LOA INCGLHI 




BNE MORE 


^MULTPOR 16 


STA CLBASE hi 








LOA VICREG 




CLC 




AND #VCMASK 




ADC #VIC0FF 


;SU MA DESPL 


ORA #NVCPOK 




STA VPOKE 




STA VICREG 


;RESTAURA REG VIC 


LDA VICREG 




LDA iNSGRHI 




AND #VCMASK 




STA E DREG 


;RE$TAURA REG ED 


ORA VPOKE 




RTS 
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Comunicaciones/Aplicaciones 



Mensaje recibido 

En este capftulo analizaremos los protocolos que se precisan para 
que dos ordenadores se comuniquen a traves de un modem 





■ ■ .u*fl y=Vi- but*** P** 





El termino "duplex" nos indica si un sistema puede 
o no transmit! r y recibir datos al mismo tiempo- Un 
sistema duplex total (full-duplex) permite la trans- 
ferencia bidireccional de datos, mientras que los 
sistemas medio duplex (half-duplex) no io permi- 
ten< Esto se puede comparar con la diferencia que 
existe entre hablar por telefono, con dos interlocu- 
tores que pueden hablar a la vez, y utilizar un 
radio-telefono, en el cual ia pulsacion del boton de 
transmision irnpide automatJcarnente la reoepcion. 

La principal ventaja de un sistema duplex-total 
es su capacidad para intemimpir ai ordenador 
transmisor. Si, por ejemplo, se esta transmitiendo 
un menu largo y usted ya sabe que desea la opcion 
1, puede pulsar "1" y el sistema actuara de inmedia- 
to sobre esa entrada. En un sistema medio duplex, 
tendria que esperar hast a que se transmitiera el 
menu complete antes de efectuar su selection. 

El duplex total se obtiene mediante el empleo de 
frecuencias distintas para cada maquina. El ordena- 
dor que hace la llamada utilizada una frecuencia 
que se conoce como la «de origen», mientras que el 
ordenador anfitrion utiliza la frecuencia «de 
respuesta». 

Protocolos de terminal 

Cuando un ordenador t ran smite datos a otro a tra- 
ves de una linea telef6nica, inicialmente no sabe 



nada acerca del ordenador del extremo receptor, 
El terminal puede ser un Spectrum con una visuali- 
zation de 32 column as o un teletipo de 132 colum- 
nar Existe la posibilidad de que tenga o no color. 
De que soporte o no caracteres en minuscula. En 
resumen, puede tratarse de cualquier maquina, 
desde un micro hasta un ordenador central, 

Existen tres formas de abordar este problema. 
La prime ra es el enfoque seguido por el lenguaje 
BaSicode, que adopta el mini mo denominador 
comiM y transmite solo aqueUos formatos que pue- 
dan ser manipulados por el terminal equipado mas 
element almente. La segunda consiste en solicit ar 
information respecto a las capacidades del terminal 
dado y luego modificar la salida para adecuarla a 
ell as. El otro enfoque es aquel en el cual el sistema 
da por sentado que ha accedido a un determinado 
terminal, o a un tipo de terminal, y deja que el soft- 
ware del usuario haga frente a los datos transmi- 
tidos. 

El primer enfoque se aplica rnuy rararnente, 
dado que el minimo denominador comun entre ter- 
minates es el teletipo estlndar. Este s61o posee un 
juego de caracteres cn mayuscula, carece de forma- 
te ado de impresidn, de color y de graficos y es de 
poca velotidad. El segundo procedimiento es mas 
comun: es el que utilizan la mayoria de los tablones 
de anuncios. El tercer m6todo es el que sue J en em- 
plear los sistemas comerciales y universitarios, y se 



Fuera de litgar 

En los anuncios publicitarios se 
suelen mostrar micros portables 
y modems acusticos qua ope ran 
a pNas tuncionando en toda 
clasa de lugares; pero existen 
algunas situaciones en que no 
pueden ser utilizados, Aigunos 
ej em pi os en este sentido son los 
telefonos publicos comunes, las 
central itas telefonicas manuales 
(que se em p lean en muchos 
hoteles) y en las lineas de ba)a 
calidad y con much as 
interferencias, problema este 
que afecta a numerosas zonas 
apartadas 
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Aplicaciones/Comunicaciones 



Observando el protocolo 

Existen tres enfoques 
principals para los protocols 
de comunicaciones. El primero 
adoptael mi'nimo denominadcr 
comun (velocidad de 
transmision reducida, pocas 
columnas de texto, ausencia de 
coforydegraficos, etc.) - En el 
segundo la maquina anfitriona 
mod if lea su saiida con el fin de 
adaptarse a diversos terminates 
(tScnica que apllcan la mayorfa 
de los tablones de anuncios). El 
tercero es para que el terminal 
se'eomporte " comoun 
determinado terminal; esto se 
consigue mediante una tecnica 
denominada emulacfdn de 
terminal 



basa en una tecnica de software que se conoce 
como emulation de terminal* 

Como su nombre sugiere, la emulacion de termi- 
nal es simplemente un me to do para persuadir a un 
micro de que actue como un terminal dado. De 
forma muy simple, el software para emulacion de 
terminal traduce los caracteres de control de termi- 
nal entrantes (tales como los que se utilizan para 
iimpiaT la pantalla o posicionar el cursor) en ins- 
trucciones comprensibles para el ordenador que se 
esta empleando. Del mismo modo, si el anfitrion 
espera del terminal una secuencia de caracteres de 
control, el software de emulacion se la proporcio- 
nara* 

Casi todos los sistemas comprenderan un subjue- 
go de caracteres de control ASCII. Algunos de los 
caracteres mas utiles son Control-S (ASCII 19 ? co- 
nocido como "XOFF"), que detiene temporalmen- 



Trsnsmisibn con un protocolo 



WEi_CC*1E T"D .7 HE. , 



3J-CQi.Unh &1SPLPV 

WlrEft^E FN TVS VDUfl •■i-^-JL rtS «&\ 
" ~yj . r: ! i i £ r T 73 APPEP«i EH Ttffl\ 
f.LETIh BOOfVE-. 



En el sistemade 
protocolo unico, fa 
maquina anfitriona ha 
derestringirsus 
transmisiones para 





adaptarse ai terminal 
mas burdo, Todos los 
terminates, no im porta 
cu&n sofisticados sean, 
reciben la misma saiida 
restringida 




Transmlslbn con varies protocols 



□ 





La maquina anfitriona 
adapta su transmision 
para ajustsrse a las 
capaeidades de cada 
terminal, Un Spectrum 

> 



Emulacion de terminal 



recibira una saiida de 
32 columnas, mientras 
queun BBC recibira 
texto en Mode 0 r a 80 
columnas 



□ 



Algunos sistemas 
anfitrion es dan por 
sentado que Eos 
usuarios poseen un 
determinado terminal. 
Si posee uno dife rente, 
su software habrS de 
convertir tanto la 
entrada como la saiida 
para emularlas 
caracteristicas de die ho 
terminal, 




te la recepci6n de datos; Cootrol-0 (ASCII 17, co- 
nocido como "XON"), que la restablece; Control- J 
(ASCII , 10, conocido como "LF"), que fuerza un 
salto de linea sin un retorno de carro, y Control-G 
(ASCII 7, conocido como "BEL"), que hace sonar 
la campanilla de la consola. El ultimo caracter 
puede ser util si se necesita atraer la atenci6n del 
operador del sistema del terminal receptor. 

El protocolo XModem 

Habiendo visto detalladamente como se transmiten 
los datos ASCII, consideremos ahora como se co- 
munica el software. La transmision de software es- 
crito en basic es directa. La mayorfa de los micros 
soportan algun medio de convertirlos en su formato 
de programa comprimido a forma ASCII; en el 
BBC utilizamos *SP0OL; en el Commodore 64, 
LISTamos un archivo en disco o cinta; en el Tandy 
se emplea la instruction CSAVE<nomb rearch ivo> , A; 
etc. El archivo asi decodificado se transmite des- 
pues y es cambiado nuevamente de formato en el 
otro extremo* 

Sin embargo, los archivos CP/M de instrucciones 
(.COM) no se pueden convertir a forma ASCII, y 
cualquier mtento por transmitir uno resulta un fra- 
caso. Por este motivo se desarroll6 un protocolo 
denominado XModem. El XModem, que es una 
earacteristica de algunos software de comunicacio- 
nes, simplemente lee un archivo CP/M del disco y 
lo transmite en un formato binario estandar. Por 
supuesto, el terminal receptor debe soportar 
XModem. 

En un future capitulo estudiaremos con mayor 
detalle el empleo de las comunicaciones por orde- 
nador. De moment o veamos someramente la gama 
de actividades en que se puede participar al dispo- 
ner de un modem. 

Correo electronico es el nombre que identifica a 
los sistemas en los que los usuarios pueden inter- 
cambiar mensajes privados me di ante la transmision 
de los mismos a un ordenador central, donde se los 
almacena hasta que el desthiario conecta con el sis- 
tema y los recupera, 

A la mayor parte de los usuarios de micros perso- 
nates les interesan dos aplicaciones determinadas. 
La primera es el intercambio de software a traves 
del tel^fono. Como ya hemos visto, transmitir pro- 
gramas en basic es muy simple y resulta mas rapi- 
do, mas sencillo y mas economico que enviar cas- 
settes por correo. Si esta escribiendo un programa 
que le plantea dificultades, puede transmitide una 
copia del mismo a sus amigos para ver si pueden 
ayudarlo* De ser asi, [ellos le vuelven a transmitir a 
usted una version operativa! 

El segundo uso de los aficionados son los tablo- 
nes de anuncios. Estos permiten que usted le pasc 
informacion a otros usuarios, deje notas solicitando 
ayuda tecnica, gaste bromas, cargue software de 
dominio publico, practique juegos, etc. 

Los tablones de anuncios los lie van aficionados y 
normalmente no cobran por los mismos ninguna ta- 
rifa (si bien algunos tablones pueden cobrarle una 
tarifa nominal initial, de alrededor de 250 ptas., 
con el objeto de cubrir los costos de funcionamien- 
to). Mas adelante analizaremos en profundidad los 
tablones de anuncios. En el proximo capitulo, no 
obstante, veremos como seleccionar modems y 
software para comunicaciones. 
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Muchos motores 



Le ensenamos como controlar varios servomotores 
simultaneamente, conectandolos al ordenador a traves de la 
puerta para el usuario 



Hay ocho llneas de datos que se pueden conectar a 
motores, si bien la caja buffer que hemos disenado 
solo puede utilizar cuatTO. Se podrian emplear las 
ocho tineas duplicando el sistema de circuito de la 
caja de salida para las otras cuatro. 

Para controlar simultaneamente ocho motores 
debe modificarse Hgerameote el algoritmo para un 
solo motor que hemos desarrollado, Los impulses 
son iniciados todos juntos, pero el segundo bucle 
de espera se reemplaza por una tabla de referenda. 
Se reservan 255 posieiones de memoria para la 
labia y estableoeo inicialmente en 255 (SFF). 

Loego se entran en esta tabla de excepciones 
(cuando hay un motor apagado). Por ejemplo* si la 
linea de dates 2 se ha de apagar tras una cuenta de 
20, se alterara la vigesima entrada de la tabla, de 
11111111 binario (IFF) a 11111011 (SFB). Observe 
que en el listado en assembly esto se efectua me- 
diante un AND con el valor que ya este en la tabla. 
Despues de entradas todas las excepciones en la 
tabla } se inicia el bucle de espera, pero esta vez 
cada elemento de la labia se opera mediante AND 
con la puerta para el usuario. 

El algoritmo para controlar motores multiples es: 



1) Especificar e! angulo de cada motor almacenan- 
do los angulos en ocho bytes (de ANGULO+Q a 
AMGULO+7). 

2) Establecer altos todos los bits de datos de la 
puerta para el usuario, para iniciar todos los impul- 
ses simultaneamente. 

3) Insertar las excepciones en la tabla de referenda. 

4) Esperar durante un milisegundo. 

5) Cargar en el acumulador el numero binario 
11111111 (SFF). Luego operar el acumulador me- 
diante AND con cada elemento de la tabla de refe- 
renda, de uno en uno. Al encontrar una exception, 
se apagara el bit apropiado. Dado que la operaci6n 
mediante AND continua hasta el final de la tabla, 
este bit permanecera apagado hasta el final. 

6) Volver a establecer las excepciones de la tabla 
otra vez al binario 1 1 1 1 11 11 , a punto para el proxi- 
mo impulse 

Los listados ofrecidos para el BBC Micro poseen la 
misma rutina initial (Mneas 10 a 280) en ambos pro- 
gramas. El primer listado es para el control de un 
solo servomotor conectado a una de las lineas de la 
puerta para el usuario. El temporizador de eventos 



BASTON DE LA 
PA LAN C A DE MAN DO 



EL SERVQtKffDR 2 COMTBOLA EL 

= ;:=_- = 




MOLDURAS EN 
FORMA DE U 



EL SERVOMOTOR 1 C0NTR0LA EL 
M0V1MIENT0 IZQUIERDA-DERECHA 



MUELLES 



Realimentacibn por palanca de 
mando 

Las palancas de mando se 
em p lean normalmente para 
proporcionar infermacron 
d i recciortal a utilizar por e* 
software. Una posible apficapon 
para ordenador de los 
servomotores coris : s:r •-' 
emplearlos para permits qpe el 
software controlador res. 't^nm 
con su Inform acid n el basBOfide 
la palanca de mando - Se LtfSzan 
dos servomotores para ernfttpr 
y tirar del baston en caoa plan 
ho rizo ntal , p ropo rdonarcjo 
importantes datos rje 
realimentacion r cs 
simuladores de vjsc 
perfeceronados. tins paancade 
mando que ' se coonga' bajo la 
mano en resgwesbaw 
movimiefrio be contra por parte 
del p 
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Bricolaje/Servomotores 



Trazadorde grtficos 

Se puede disenar un trazador de 
graficos utilizando un 
servomotor para mover el lapiz 
hacia adeiante y hacia atras t 
mientras un motor paso a paso 
va moviendo el papel por debajo 
deaquBl. El movimiento angular 
del husilio del servomotor se 
traduce en el movimiento lineal 
hacia adeiante y atrAs del l&piz 
graciasauna correade 
transmision. E! movimiento del 
lapiz se corresponde con los 
cambios de una variable del eje 
vertical (p. ej. r temperatura o 
presion baromfrrica); la 
alimentacidn continua del papel 
depende a menudo del 
transcurso del tiempo 



Mecanismo de direction 



SERVOMOTOR 




RUEDA 



VARILLA DE UNl6N 
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En nuestro robot el control 
directional se obttene 
mediants el control 
independiente de dos motores 
paso a paso bidireccionaies, 
Unaposfbie afternativaaesta 
disposicion serlatener on 
motor paso a paso para 
activarel vehiculoy un 
servomotor para dirigirlo. El 
diagrama muestra un 
servomotor montado sob re el 
eje de las ruedas, empujando 
o tirando de las va rill as que 
conectan las ruedas para 
dirigirel vehfculo. Otra 
disposicion podria ser utilizar 
un mecanismo de diredcf6n de 
cremalleray pimSn, montando 
el engranaje del pfnon en el 
husilio del servomotor 



se prepara mediante basic. Un procedimiento de 
initialization ensambla la rutina manejadora de 
eventos antes de que el programa principal la eje- 
cute permhiendo el evento 5. 

En el BBC Micro, el sistema operative incluye 
un temporizador para el usuario en centesimas de 
segundos. Establetiendolo en 2 centisegundos (dos 
interrupciones de 10 milisegundos cada una) y utili- 
zando luego el vector de "eventos", el procesador 
saltara al codigo u impulsador" en el momento ade- 
cuado. Puesto que el sistema operative sc diserio 
para emplcar los eventos, el program a sdlo ha de 
retornar (RTS) desde la subrutina, y no usar RTI. 

El segundo listado, para el control de multiples 
servomotores, utiliza primero un bucle en basic 
para inicializar fa tabla de referencia con valores 
$FF. Si cada elemento de la tabla saliera de uno en 
uno hacia la puerta para el usuario. todos los impul- 
ses continuarian durante dos milisegundos. Sin em- 
bargo, se pueden hacer exception es y apagar cada 
motor por tumo. Las excepciones se insertan en la 
tabla ernpezando per el motor 7, medianle el em- 
pleo de un desplazamiento (en el registro X) pro- 
porcional a la longitud del impulso, Luego la labia 
sale hacia la puerta para el usuario mediante el di- 
reccionamiento indi recto de cada elemento de uno 
en uno, esta vez utilizando el direccionamiento in- 



HUSILLG 
ESCLAVO 



CORREA DE 
TRANSMISION 



EL SERVOMOTOR CONTROLA 
LA P0SICI0N DEL LAPIZ 



EL MOTOR MUEVE EL 
PAPEL MEDIANTE UN 
SISTEMA DE TRACCION 
0 DE FRICCluN 




R0LL0 DE PAPEL 



directo postindexado (donde el procesador le suma 
el valor del registro Yala direction hallada en un 
vector de pagina cero). 

Los patrones de bits (excepciones) que deben en- 
viarse a la puerta para el usuario para controlar los 
motores se producen del siguiente modo. Se re- 
quiere el binario 011 1 1 11 1 para apagar el motor 7; 
el binario 10111111 para el motor 6; el 11011111 
para el motor 5, etc. Estos se generan cargando el 
registro A con $FF y limpiando el flag o indicador de 
arrastre. Luego, como la rutina trata cada excep- 
tion de una en una. estos bits se desplazan una po- 
sition hacia la derecha. En el primer desplazamien- 
to, el bit de arrastre se desplaza al bit % el bit 7 se 
desplaza al bit 6. y asi sucesivamente, con el bit 0 
reemplazando al bit de arrastre. El patron de bits 
re,:uer:ic para apagar cada motor se guar da tem- 
poralmente en la pila, Cada entrada de la tabla se 
opera mediante AND con la entrada anterior (cuan- 
do esta sale) para asegurar que una vez apagado un 
impul>: r>".e perr^nezca apagado. 

Hafaiendo geuerado el codigo maquina, el evento 
5 se limpia para la action. Porconsiguiente. pulsan- 
do la tecla Shift junto con una tecla numerica del 1 
al 8 se selection a uno de los motores, mientras que 
pulsando las tec! as del 1 al 9 los motores se colocan 
en poski6n. 

Utilization de los listados 

Para usar los listados para el BBC, simplemente 
entrelos, guardelos y luego ejecutelos. Tanto el lis- 
tado de un solo servomotor como el de multiples 
servomotores se ej ecu tan con la rutina initial 
comun (de la Hnea 10 a la 750). 

Para el Commodore 64, el segundo algoritmo 
utiliza las m ism as teclas de instrucciones que el lis- 
tado para el BBC, El programa de llamada en basic 
permite establecer de forma independiente la posi- 
tion de cada motor: la tecla Shift y una tecla nume- 
rica del 1 al 8 selectionan el motor deseado, y una 
tecla del 1 al 9 define la position requerida. 

Si posee un ensamblador, entonces digite el lista- 
do fuentc y cnsamblelo en un archivo objeto que 
subsiguiente men tc se pueda car gar mediante el 
programa de llamada en basic. De no ser asi, digite 
el cargador en basic para el lenguaje maquina y 
ejecutelo. Digite NEW antes de cargar y ejecutar el 
programa dc llamada cn basic. Si utiliza el cargador 
en basic j puede omitir las lineas 30 y 40. 
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Servomotores/Bricolaje 



Commodore 64: 
control de servomotores 
multiples 

Codigo fuente 

1000 

1010 ;+++++++++++++++++ 
1020 ;++ 

1030 ! + + CONTROL MULTIPLES ++ 
1040 ; + + SERVOMOTORES C8M ++ 
1050 ;++ ++ 
1060 ; + + + + + 

1070 ; ++-F ++ ++++++ +++++ + 

1090 PUERTA-56577 ;REGISTR0 OATOS PUERTA USUARIO 
1100 ANGUL0=1228 ;P0SlCI0N VALOR ANGULO 
1110 CPAG=SFB ;PUNTER0 PAGINA 0 A TABLA 



1120 ; 
1130 * 
1140 ; 
1150 
1160 
1170 
1180 
119C 
UflC 



=50334 



SE! ; INTERRUPClONES DESACTIVADAS 

LOA S0314 ; VECTOR IRQ EXISTCNTE 
LDXS03C4 




; INTERRUPCfONES ACfTVAOAS 



■ MANEJADOR EVENTOS + + + + 



PUP 
PHA 
TYA 
PHA 
TXA 
PKA 



: GUARDAR REGISTROS 
; EN LA PELA 



pa 

' : V 

1390 
1400 
1410 

1420 

1430 
1440 ; 

1450 ; + + EMPEZAR IMPULSO, PARA ALGUMOS MOTOR ES 
1460 ; SE PODRIA COMENZAR ANTES DE LLEN.AR LA 
1470 JAB1.A Y REDUCIR ASI EL BUGLE DE ESPERA DE ABAJO ■ 
1480 ; 

1490 LOA #SFF 

1500 STA PUERTA 

1510 ;++ LLENAR TABLA CON EXCEPCIONES + + 

1520 LOX #$07 

1530 LDA #SFF 

1540 CLC 

1550 EXCEPT 



PATRON DE BITS 
TOMAR DESPLAZ, MOTOR X 
CONSERVAR PATRON EX1STENTE 
PERO MODIFICADO PARA MOTOR X 




LA TABLA ESTA CAftGADA — - 



; TDOOS LOS WHJLSOS 3CB*- 



17-5 

1720 BUGLE 
1730 

1740 
1750 
1760 
1770 ; 
17S0 
1790 

1800 LI MP! A 
1B10 
1820 
1S30 
1840 

1850 :++ AHORA SE OEBEN TERMINAR TODOS LOS IMPULSOS 
1360 PLA 
1870 TAX 

1880 PLA : RESTAURAR REGISTflOS 

1S90 TAY 
1900 PLA 

■ n : plp 

1920 J MP SEA31 



AND (CPA6},Y 
STA PUERTA 
INY 

BNE BUGLE 

LOX #S07 
LOA #SFF 

LOY ANSU10.X 
STA (CPAG},Y 
DEX 

BPL LIMPIA 



; PERO OPERAS CON MASCARA 
CADA ELEMBiTO ; DE LA TABLA 
POR TURNO 



; SORflAR TO DAS LAS EXCEPCIONES 



Programa 
cargador 
en basic 



CARGADOR EN BASIC PARA ' 
MULTIPLES SERVOMOTORES 



10 REM * * 
20 REM " 

30 : 

40 FOR 1=320 TO 922 
SO READ A: POKE J,A 
60 CC=CC+A 
70 NEXT I 

BO READ CS:lFCSoCC THEN 
PR! NT "ERR OR EN SUMA DE 
CONTROL": STOP 
10O DATA120.1 73,20,3,174,196,3, 141, 196 
110 DATA3,142,20,3,173,21,3 7 174,197,3 
120 DATA141, 197,3,142,21, 3.1 69 ,255, 160 
1 30 DATAO, 1 45 ,251 , 1 35 , 208 , 25 1 ,86 , 96,8 
140 DATA72, 152,72,1 38,72,1 69,255,141 ,1 
150 DATA221 ,162,7,1 69,255,24,106,72 
1 60 DATA1 88,0,43.49,251 .145,251 ,104 
1 70 DATA202 , 1 6 , 243 , 1 60,46 ,136, 208,253 
180 DATAf 69,255, 160,0,48,251, 141 .1,221 
190 DAT A20 0,208,248 .162, 7, 1 66.255,1 88 
200 DATA0,48, 145,261 ,202, 16,248. 1 04 
210 DATA1 70,104 ,168,1 04,40,76,49,234 
220 DA7A13Q72:REM*SUMA DE CONTROL* 



Programa 
de llamada 



en basic 



IUJBJESSERMWKJTOHES 



30 DK^&RBI Si CASSETTE ElfTONCES 

40 IF A =0 THEN A=1 UOAfTMULUSER V. 

HEX-,ON,1 
50 POKE 778.88: POKE 779.3:REM 

PUNTERO A MANEJADOR EVENTOS 
80 POKE 251,0: POKE 252.49:REM 

ESTABLECER PUNTERO PAGINA CERO 
70 ROD =56579: POKE ROD, 255: REM 

TOOAS SAL I DA 
80 MC=820: SVS MC 
90 : 

1 00 GET KS:5F KS= " " THEN 1 D0:REM 

ESPERAR TECLA 
110 REM "* ALTER Aft POSICION MOTOR ** 
115 AK=ASC(KS) 

120 IF AK> 48 AN D AK<58 THEN POKE 

12288+SERVO.VAL(K$1'20 
130 IFAK>32 AND AK<40 THEN 

SERV0=ASC(K$)-35 
140 IF KS--> :, E" THEN 100: REM H E" PARA 

SAUR 



Control de un solo servomotor 

Enssmter eJ caSgo maquina 



T55 REM 1 
361 RBI 



10070 [OP7C 



10090 , guaniar regisfros primero 
10100 FWP: PHA^TYAPHA: TXA : PHA 
10110 

10120 LDX Exnelo; 
10130 LDYtyralcjj 
101 40 JSR fif FF 1 reinicializar relaj 
10150 LDAS&FF 
10160 STApuertab 
10170 rtsperar aproDt. IrFiseg 
10150 LDYE&FF 
.BUCLE DEY 

BHE BUCLE 

10210 yy corner jmpniso 

10220 LDY anguSo 
.BLICLEt DEY 

BNE ELPCLE1 
j'CCTencr lofos los irnp-irlsss tie sail ea 
1C260 LDAtao 
10270 STA puelab 
10280 PLA:TAX:PLA:TAY:PLA:PLP 
10290 RTS 
10300 ] 
IDS 10 NEXIC 

10320 REM apuilar a: maneJadorevienTos 

10330 !&220=mantfa<torev«ntos OR (I&22QAHD &fFF?000O> 

10340 ENDPflOC 



101 90 
10200 



10230 
10240 
10250 



Listados para el 
BBC Micro 

Rtitma inicial comun 

10 M0OE0 

15 REM * 

10 REM Prepay el temppiiMdiir etc. 

17 REM 

20 rjsbyte=&FFF4 

30 :x%=ao2 -y%=&ff 

40 CALLcsfoyle; REM preparar mto S paiasalirfa 

50 OS 

SO Q1Mp%(8| 

70 OIMieJoJ% 12, Eeer%1? 

80 M0O25& 

90 yrelaf-reiOj^ DIV2SB 
100 jrtecr=fMr% MOD 256 
110 yteer=l«r% OIV256 
120 PflDCSnicial 

1 30 FOR I** angulp HO aitgulO+ &:aJiguto?t% = 1 28iNEXT 

140 t=,02 ;R£M s«g enue impufcos 

150 fw%=&FFFFFFFf -(t*1M) + 1 

160 reloj1i?4^&FF :REMesrgar byte mas aJto 

170 ?reloj%=ltora% :REM esta Heur «*oi , permiltr eventas 

m ^F5(14.5 

100 A%=A-X%^x\e\a\ :f%^i>\ -CALL SFFF1 

195 REM ■--*■"■"»■«*■ 

196 flEM ElconSrolarfDrBAStC 
107 REM * 
200 CLS 

21 a PRI Ut* PULSAR SH IFT+ NUMERO para sfileccintiar mOSOr' 
220 PRlWT'PtJLSAR NUMERO para SfJ^cipnaranflLlQ" 

225 mo(or=1 
230 REPEAT 
240 A-GET 

250 lFA>«f AN0A<43A™eN 

3 -{A - 43O)M0* (225jW) ^UlO?(molor- 1 }=a:RRlHTTAR 
(lOjmMw):" matir. 'motor "anQuio "anguto "a 

2E0 rA>43OAJ0A<A2ATHENnsotof=A-«O 

739 t*10 



Control multiples servomotores 



Ensajmtiaj el c&3»50 maquina 



755 REM ' 
im P£M 

757 HEM ' 
760 fJEF PROCltlkSal 
770 OtM Espaao% 600 
700 FOR CvO TO 3 STEP 3 
790 pa9inarero=&70 :REM litre para usuarios 
BOO pueilab=AFE60 :osword = &FFF1 
010 P%=fi5paci0% 

020 angulo- P% :P% = P% +8 ;R£ M poienc a r enie 3 mo;o «3 
B30 la61a=P^ :P%"P^'l.+256 :REM 256 longilw^s de impulso 
pflsibks 

S35 F0H1% "labia TO tabla +■ S 100' ?1 00:^ J% = aFF:KEXT 

€40 towlaMaft =tab!a MOO 255 

850 t^ighlabla^-!ablaCIV256 

060 7paginaM(0^towtabla% :paainarjero71 =higfilabFa% 

870 ICPTC 

830 .manejadortvHitos 

890 PHP:PHft:TYA:PHALlXA:PHA 

900 L0A£&04 

010 LBXEttttoj 

020 LOY£yfdDj 

930 JSRusword 

990 ,'Comenzaf impulso. para a^gunos nnotor&s seria poslble 

comenzar abajo 
1 000 .-"antes fte tertar Ea tibia y reduck asi el tmcle de ejp^ m de abajo 
1010 LDA E&fT ;STA puertah 
1020 .' iena r labia con exC£pti$ne5 
1030 LDK W7 :LDA £&FF :CLC /preparar patron bils 
1040 
1050 
1060 



RORA-PHA /patrOflde bils 

LDY angvSpXnjomar desplazamiento cof respondienrte al ar* julp 
del motor X 

ANO (paginaceroj.V -x^servar patron bits e»slenCE 
STA fpaginacero).Y /pera modif^ado pa« mptorX 
PLA:0FX 
BPL excepsonK 
.'ahora la labia esta cargada, dejarpasar un poco de liempa 

LDYcaeo 

.esperar D£Y 

SNE esperar 
LOAESFF /ladas !d& impu!sc<s encfifldidos 

.tiucleAHD (pagiftaceral, Y/pero enmasqararcadaeiemenlo 
STA puenab m la labia parltirno 
INY 

BNE t ut :& 
LDK £&7 :LDA ESFF 
.limpiar 

LOY angulo.X /votver a bsrrar Codas las escepciones 
STA fpagfhacerohY 
DEX 

BPL limpiar 

/aTioralodos tos impuisos tfeben rtaberterrrincdu 
PLA:TAX;PLA:TAY:PLA:PtR 
RTS 
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Software/Paquetes educativos 



Aprender jugando 

Esta vez revisaremos diversos programas educativos destinados 
a los ninos mas pequenos 



Story machine (La maquina de las historias), pro- 
ducido por Spinnaker, esta disenado para nifios de 
cinco a nueve anos de edad. A traves de el se pre* 
tende ensefiar las reglas de la sintaxis, mejorar la 
ortografla y estimular la escritura expresiva. 

El programa contiene un diccionario de 52 pala* 
bras, de las cuales cinco son nombres propios: los 
nombres de un nino, una nina, un gato, un perro y 
una criatura denominada bumpus, todos los cuales 
deben ser especificados por el usuario al comienzo 
del programa, 

A partir de este diccionario el nino construye fra- 
ses simples que luego son representadas por los 
personajes en la pantalla. For ejemplo, ia frase 
"Mauricio besa flores" visualizara un personaje que 
represente a un nino (al cual el usuario habra Ila- 
mado Mauricio), unos caracteres con forma de flo- 
ras y, cuando eslos se acerquen lo suficiente, apare- 
ceran corazones intermitentes indicando los besos, 

Si una palabra esta mal escrita o se la emplea de 

Story machine (La ntfquina de las historias) 




forma incorrecta, el ordenador se negara a aceptar- 
ia, visualizando un mensaje en que explica lo que 
esta mal y en que pide que la palabra se rnodifique 
o se sustituya. Al final de cada frase (es decir, des- 
pues de cada punto) el programa intentara ponerla 
en escena, Cuando se ha construido una historia, 
hay una opcion para representarla completa. 

Si el usuario se aburre de escribir sus propias his- 
torias, Story machine ofrece otras dos opciones: 
puede compartir la escritura de la historia con el 
programa (turnandose para anadir palabras) o 
dejar que el ordenador haga todo el trabajo y que 
escriba 6\ la historia. Esto es factible porque el dic- 
cionario esta dividido por elementos de la frase 
(sustantivos, verbos, preposiciones, etc.) y posee 
un algoritmo gramatical estricto para generar sus 
propias frases- 

La mayoria de las palabras del diccionario, asi 



como las estructuras oracionales utilizadas por el 
programa, son muy send lias. Los verbos, en parti- 
cular, describen acciones que se pueden describir 
fadlmente, tales como "salta" y "va". Es interesan- 
te el hecho de que se haya incluido un verbo imagi- 
nario, zot, el cual parece significar "pegar" o "gol- 
pear". De ser asf, ello estaria en desacuerdo con la 
regla mantenida por Spinnaker, de que esta mal 
herir a otras personas o a anirriales, y por lo tanto el 
programa no admitira ninguna accion que implique 
un dano fisico a otros. 

El programa posee dos reglas gramaticales fun- 
damentals: una oration debe contener un sujeto, 
un verbo y un objeto, en e! orden correcto; y las 
formas en plural y en singular deben ser coheren- 
tes. Mas alia de estas reglas, la sintaxis es menos 
satisfactoria debido a las inmensas variaciones del 
uso del idioma ingles. Por ejemplo. el ordenador 
aceptara la frase "Houses eat rocks" (Casas comen 
rocas) pero no aceptara la frase (C Girls eat rocks" 
(Chicas comen rocas) sin e! articulo dennido antes 
de la palabra "cm. 

El programa parece incluso quebrantar sus pro- 
pias re das. Deques de la frase "Bump uses eat 
3^--^: a ooineri toeas), el programa ge- 
nera la oration "They walk to its fence' 1 (caminan 
hacia so wrja). Nonnalmente, al encontrarse con 
la palabra (sh} ? el ordenador generana el men- 
saje ^Wkose?" I^De quien?) y solicitaria que se 
cambiase la palabra. El programa tambien ha 
becbo caso omiso de su regla de no mezclar formas 
en singular y plural, Estos se podrian consider ar 
errores menores, pero un programa que se vende 
como educativo deberia al menos ser coherente y 
debe ser siempre correcto. 

Kids on keys (Ninos a las teclas) es otro producto 
de Spinnaker, dirigido a ninos de tres a nueve anos. 
El programa tiene como objetivo ensefiar al usua- 
rio a identificar paiabras, letras y numeros. En el 
paquete hay tres juegos dife rentes, cada uno de los 
cuales posee varios niveles de dificultad. En el pri- 
mer juego, una letra se desplaza hacia abajo de la 
pantalla y el nino debe pulsar la tecla correcta antes 
de que la letra llegue al limite inferior. Al cabo de 
15 letras, aparece flotando hacia abajo un globo 
que contiene una palabra- Esta tambien debe digi- 
tarse correctamente antes de que el globo llegue 
hasta la parte inferior de la visualizaci6n. El juego, 
por lo menos, consigue que el nino disfrute mien- 
tras se familiariza con el trazado del teclado, 

En el segundo juego se van desplazando hacia 
abajo de la pantalla una serie de imagenes (sprites 
ampliados) y el nino debe digitar el nombre del 
objeto antes de que lleguen a la parte inferior- Des- 
pues de esto, hay una ronda extra en la cual des- 
cienden los mismos objetos, pero en este caso fal- 
tandoles dos cuartos de la imagen, lo que hace que 
re suite mas diffcil reconocerlos, En este punto, el 
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Kids on keys (Nines a las teclas) 
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juego tiende a convertirse en una prueba de re- 
flejos, mientras el jugador busca freneticamente las 
feclas para digitar las letras correctas, Un importan- 
tisimo mconveniente del programa es la ausencia 
de una facuidad para borrar, con lo cual la pulsa- 
ckm errada de una teda se vuefrve sumamente frus- 
tnmte. 

Quiza el problema mas serio del juego sea que 
algunos de los sprites estan maJ dibujados y es dirl- 
cil identificarlos. For ejemplo, si un nino decide 
que un determinado dibujo es un hombre, podria 
digitar u hombre" de forma correcta, solo para des- 
cubrir que el sprite continua su descenso porque el 
programa considera que es un "oso" o un i£ nino*\ 
El pequeno puede entonces llegar a la conclusion 
de que su ortografia es incorrecta, porque el pro- 
grama no le explica el motivo del fallo {puesto que 
no posee facilidad alguna para analizarlo). Ade- 
mas, una vez que el sprite ha llegado a la parte infe- 
rior de la pantalla, el programa no ofrece ninguna 
indicaci6n acerca de cual era la respuesta acertada. 
Un buen programa educative no solo le proporcio- 
naria al usuario la posibilidad de intentarlo otra 
vez, sino que tambien visual iz aria la respuesta co- 
rrect a despues de haber obtenido varias respuestas 
equivocadas. 

En el tercer juego se visualizan en la pant all a 
cinco fjguras y una palabra. y el nino debe eneon- 
trar la pareja correcta para la palabra. Este juego 
tiene menos reladon con la velocidad que los dos 
anteriores* si bien tambien adolece de la pobreza 



Aprender a leer 



Macmillan, la editorial britanica de publicaciones 
educativas, ha desarrollado una serie de programas 
para el Spectrum bajo el tftulo colectivo de Learn 
to read (Aprender a leer). Estos cinco programas 
(producidos en colaboraci6n con Sinclair Research) 
derivan del esquema de lectura Gay way de Macmi- 
llan, que ha obtenido un exito enorme; se trata de 
un curso centrado en el nino que se utiliza amplia- 
mente en las escuelas primarias. Dado que el curso 
Gay way esta orientado hacia la ensenanza indivi- 
dual, posee la ventaja de que los usuarios aprenden 
a leer a su propio ritmo. Una serie de programas 
para ordenador es una ampliacion natural de ello, 
puesto que utilizar un ordenador es evidenternente 
una actividad orientada hacia el individuo. 
Los cinco paquetes componen un curso prelimi- 



nar de lectura complete . El primer programa pre- 
sent a seis animales (Deb la rata, Sam el zorro, etc.) 
y estos se mantienen a lo largo de todo el curso 
para proporcionar un sentido de continuidad y fa- 
miliaridad. 

Los programas dan por sentado que el nino no 
posee ningun conocimiento previo de ordenadores 
ni de lectura. En cada programa la seleccion de las 
opciones es directa, Por ejemplo, e! primer progra- 
ma visualiza cinco opciones, y rodeando el nombre 
de cada una va apareciendo, de uno en uno, un 
rectangulo intermitente. El usuario espera hasta 
que el "'cursor" rectangular rodee la option reque- 
rida y entonces pulsa cualquier tecla. Para utilizar 
este menu no se necesita emplear ninguna otra ins- 
truction. 

Una vez escogida una option, el ordenador de- 
muestra lo que se requiere y le solicita luego al nino 
que de una respuesta, Si el nino da una respuesta 
equivocada, se le orreceran varias oportunidades 
mas antes de que el ordenador visualice la respues- 
ta correcta, 

Los seis animales que aparecen en el programa 
estan dibujados en graficos de alta resolucidn, y 
estos son muehistmo mas atractivos que algunos de 
los que se incluyen en los otros juegos educativos 
que hemos anallzado* Desde el punto de vista del 
entreterarniento, quiza el valor de la serie Learn to 
read no sea tan alto como el de muchos otros pa- 
quetes. pero su valor educaiivo parece ser muchisi- 
mo mayor, y, a la larga ? tal vez mucho mas prove- 
choso para el nino. 
Learn to read (Aprender a leer) 
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Gran Premio 



Participe en uno de los juegos recreativos que han tenido mayor 
exito: "Gran Premio". Esta version ha sido escrita para los 
ordenadores Atari 




En la pista de carreras, cuatro coches encabezan la 
competicion en una carrera desenfrenada; usted 
debe evitar tener on accidente mientras trata de re- 
correr la mayor distancia posible. Utilice la palanca 
de man do para dirigir sii coche y el boton rojo para 
cambiar de velocidad. jAtenrion!, este programa 
emplea lenguaje maquina, de modo que tome pre- 
cauciones antes de lanzarse a competir. 



0 REM "* GRAN PREMIO, ESCRITO " 

1 REM * * POR PAUL DUNNING 

2 DIMS{4} t V$(1Q) p ES(10Q) 

3 GRAPHICS 5:VS= "LENT" :P0KE 752,1 

5 GOSUB 1000 

6 POKE 765,2:CQLOR 2: PLOT 0.0: DRA WTO 79, 0:PIQT 
79,47;0RAWT0 79,30:DRAWTO OPPOSITION 0,47:XIO 
18,#6,0,0."S:" 

7 POKE 765 , 3: CO LO R 3 : PLOT 79 . 29: D RAWTO 79 , 1 
:DRAWTQ 0,1 : POSITION 0,29:X10 1 8, #6,0,0, "S:" 

8 POKE 712,148 

10 PP=PEEK{106)-16:POKE 54279,PP 

20 PM=PP*256:P0KE 559,62 

21 FOR Q- 53256 TO 53260:POKE Q,3:P0KE 
Q-8,RND(1)*255:NEXTQ 

22 POK E 53 248 , 1 0 D : P0 K E 53249 ,1Q0;POKE 5325 0 , 
100:POKE 53251,50 

23 POKE 704, 109: POKE 705.89:PQKE 706,79: POKE 
707 ,29: POKE 53277, 3:P0KE 559.62 

24 FOR Q= PM+ 1024 TO PM+2048: POKE Q.0:NEXTQ 

30 RESTORE 210: FOR Q=PM+1144T0 PM+1280:READ 
A:!FA=-1 THEN 32 

31 POKE 0,A:NEXT Q 

32 RESTORE 2 10: FOR 
A:IFA=-1 THEN 34 

33 POKE D,A:N EXT 0 

34 RESTORE 210; FOR Q= 
A:IF A— 1 THEN 36 

35 PGKEQANEXTQ 



PM+1360TD PM+1536:READ 



PM+1576T0 PM+1792:READ 



36 RESTORE 210:FOR Q=PM +1842 TO PM -E- 2048: READ 
A+1FA=-1 THEN 40 

37 POKE Q,A:NEXTQ 
40 POKE 623.1 

50 SOUND 0,255, 12, 5:SQUND 1 ,145,12,5:S0UND 
2,200,12,5 

60 FOR 0=53256 TO 53260:P0KE Q,3:P0KE 

Q-8,RND(1)^55:NEXTQ 
70 POKE 704 , 1 09:POKE 705,89: POKE 706,79 POKE 

707,29:F0KE53277,3:POKE 559,62 
75 ST=PM + 1842:VI = INT(ST/256):LT=ST^256*VI:P0KE 

203,LT:POKE 204,VI:P0KE 205,10 
80 P1=(RND(1)MOO)+100:P2=(RND(1)MOO}+100:PO= 

(RND(1)MOO)+100:P3=50 
85 FOR Q=Q TO 3:S[Q)=(RND(1)*2)+1;NEXT Q 
87 POKE 53248, P0:P0KE 53249, P1 :P0KE 53250,P2:P0KE 

53251,50 

68 F0RQ=1 TO 50:X=USR(ADR(E$),7):NEXT Q 
90 IF V$- ' RAP. " THEN GOSUB 400:GOT0 1 20 

92 POKE 53278,1 

95 P0=P0+S(0):fF P0>255THEN P0=Q 

93 X = USR(AD R (E$) , STICK((0) ) 

100 P1=P1+S(1):IFP1>255THENP1=0 

1 05 X = USR(ADR (ES) , STICK{0) ) 

110 P2=P2-f-S(2):JFP2>255THEN P2=G 

120 KM=KM+001 

124 X=USR(ADR{ES},ST|CK(0)) 

129 !FSTR16[0)=0 THEN GOSUB 500 

130 POKE 53248,P0:PQKE 53249,P1:P0KE 53250. P2 



:PGKE 



135 POKE 656.2 POKE 657,5:? 'VELOCID *:VSr 

556,2: POKE 557.20:? "KJLMS'rKMf " 
140 CP=PEEKf53263):CS=PEEK{53255) 
150 IFCPoOTIBi600 
160 IFCSo4TF©i600 
190 GOTO 90 

210 DATA«^28,238,23S 238.238,78,68,229,245,255, 
25 5^^ ^55^33.255.255.245,229,63,78,238.238, 
238 

215 DA"A23S 233.64 .-1 

m C==«l|p«Kir3):S(CJ=(RND(1) x 2)+1:RETURN 



±X PO=f»-fS(0 


)-2):IFFD<0 THEN P0=255 


iif i=_5= 


ES),STICK(0)) 


410 PT=P1-{S(1 


1"2>:IF PK0 THEN P1 =255 


415 X=USaiADS 


b$),sncK{0)) 


12: =2 ==2- 5-2 


■: : :^enp2=255 


-if = -:- 




±3C KM=KM-0( 





500 FV5=*RAP." THEN VS=~LEN T " SOUND 

0,255,12,10:SOUNO 1.245.12.10:SOUND 

2,235.12.10:RETURN 
510 V5= RAP. :SOUNDO,100.12,10:SOUND 

1,110,12,10:S€UND2.90,12.10:RETURN 
600 GOTO 640 

605 SOUND 0,0,0, 0:S0UND 1,0,0,0 SOUND 2,0,0,0 
610 POKE 53248, 1O0:POKE 5 3249, 100 POKE 53250,100 
620 TRAP 620:? " QTRA?" ;:INPUT V$:IF V$(1 ,1 )= M 0'' THEN 

KM=0:V$="LENT':7 CHRS( 125): GOTO 24 
630 END 

640 J=PEEK{203)+256'PEEK(204) 

645 FOR 0-1 TO 250:IF PEE K(J+Q)=0 THEN NEXT Q 

650 ST-J+Q:VI=INT(ST 256):LT=ST-256*VI:POKE 203, 

LT:PGKE204,Vf 
655 FOR P=1 TO 60 

660 X=USfi(1536):S0UND 1 ,PEEK{53770),120,15 

670 POKE 707,PEEK(53770) NEXT P 

700 POKE 53251 ,0:GOTO 605 
1000 RESTORE 2000 
1010 TRAP1050:P=0 
1020 P=P+1:READA 
1030 E$(P,P)=CHRS(A) 
1040 GOT0 1020 
1050 RESTORE 3000 
1060 TRAP 1090:P=1536 
1070 READ A:P0KEP,A:P=P+1 
1080 GOTO 1070 
1090 TRAP 40000 
1100 RETURN 

2000 DATA 104,1 04 , 1 04,74,72.176,1 1 , 1 60,0 . 1 77,203, 

1 36, 1 45.203, 200.200, 208, 247, 1 04,74.72 
2010 DATA 176, 11, 160, 0,177, 203, 200, 145,203,136 
2020 DATA 1 36,208,247, 1 04,74,72, 1 76.7,1 98,205, 165 
2030 DATA 205,141 ,3,208,104,74, 1 76,7,230,205,165,205, 

141,3.208,96,END 
3000 DATA 104. 160,0, 173, 10,21 0,1 45, 203,200, 192,25,208, 
246,96,END 
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rdenadores de bolsillo Sharp/Hardware 



Llegados de Oriente 




El PC-1251 y el PC-1500A, de 
Sharp, son dos ordenadores de 
bolsillo ligeros, Versailles y de 
precio asequible 



La estrategia de marketing de la firma japonesa 
Sharp contrasta notablemente con la de Casio, la 
otra empresa fabricante de ordenadores de bolsillo, 
En primer lugar. produce dos maquinas bastante 
dife rentes, mientras que Casio comercializa tres 
maquinas relativamente similares. Las dos maqui- 
nas de Sharp no estan disenadas para competir 
entre si: el PC-1251 es el ordenador de bolsillo mas 
pequerio que existe actualmente, y el PC-1500A es 
considerablemente mas grande y mas potente. 

El Sharp PC-1251 pesa apenas 115 g y mide 
135 x 70 x 10 mm, EI tamano del teclado es aun 
inferior a la mitad de uno estandar y la anchura de 
las teclas es de s61o 4 mm. Son lo suficientemente 
grandes, eso si, para asegurar que, siempre que se 
tenga cuidado, al pulsar una tecla no se pulsen tam- 
bien las cuatro que la rode an. Al lado del teclado 
alfabetico hay uno numerico con teclas mas gran- 
des, que permite utilizar el ordenador como una 
calculadora de bolsillo normal. 

El PC-1251 posee una visualization en cristal H- 
quido de 24 caracteres de anchura. Esta se puede 
regular para diversos angulos de vlsi6n y condicio- 
nes luminosas mediante una pequefia rueda situ ad a 
en uno de los extremos del ordenador. A la dere- 
cha de la visualization hay un interruptor Mode Se- 
lector (selector de mod alidad). Hay tres modal id a- 
des ope rati vas: una permite definir la funtion de 
ciertas teclas (RSV); una segunda modalidad fatilita 
la program acion (PRO), y la tercera permite ejecu* 
tar un programs en basic o utilizar la maquina 
como calculadora (RUN). Este interrapior tambien 
se emplea para apagar la maquina, 

A pesar de no responder del todo al estandar de 
los micros person ales comunes, la version de basic 
utilizada es buena tratandose de una maquina tan 
pequefia. Posee mstrucciones de las que carecen al- 
gunos de los ordenadores de bolsillo de Casio, 
como ASC y CHR$; pero, al igual que estos, carece 
de la option ELSE para la instruction IF.,, THEN. Al 
igual que los ordenadores Casio mas pequenos, el 
basic del PC-1251 utiliza los mismos nombres de 
una sola letra para series y variables. Ello significa 
que si se empleara la variable A para retener un 
numero, no se puede utilizar la variable en serie A$. 
Del mismo modo, algunas matrices podrian macha- 
car las mismas zonas de memoria* 

Esta version de basic s61o produce nueve men- 
sajes de error y todos letras unicas, lo cual carece 
practicamente de utilidad para atrapar errores en 




los programas* Como opeion adicional, la instruc- 
cion PASS permite proteger los programas median- 
te una palabra clave. En el basic del PC-1251 los 
numeros de linea estan limitados a la gama del 1 al 
999. En la mod alidad de entrada de programas, dos 
teclas de cursor le permit en al program ador ir des- 
plazando las line as del programa hacia arriba y 
hacia aba jo. En todas las modalidades, otros dos 
cursores permiten el desplazamiento lateral, 

Puesto que es escaso el software disponible para 
la maquina. la mayoria de los usuarios habran de 
escribir sus programas. En este senrido. el manual 
results ci ; ... _- .. ■ - 1~ . 

ofrece una guia de basic buena y de facil compren- 
sion, aun que no incluye ensenanza para printipian- 
tes. En segundo lugar. contiene los listados de 
nueve programas cortos, no todos los cuales son 
aplicaciones matematicas (hallar raices, desvi acion 
estandar, etc.); entre los otros programas incluidos 
hay uno para "practicar mecanografJa" y un juego 
de "aterrizaje suave". Ad em as. Sharp ofrece tres 
cintas que contienen una selection de programas. 

Mientras que los ordenadores Casio pueden 
tener hasta 10 programas simultaneamente en la 
memoria, el PC-1251 se limit ad a a uno cada vez. 
Sin embargo, se puede utilizar un programa com- 
puesto por varios subprogram as, separados cada 
uno por sentencias END. Un programa se puede de 
esta man era ejecutar mediante el empleo de GOTO 
con el numero de linea apropiado. Es muy practtco 
tener varios programas en la memoria al mismo 



Potencia de bolsillo 

Con RAM CMOS y CPU de 8 
bits, teclado QWERTY, basic y 
una. gama de perifericos 
opcion ales, estas 
"calculadoras" Sharp tieraen el 
derecho de ser considered as 
rnicroordenadores a pequefia 
escalayautenticamente 
portatiies 
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tiempo. va que no existe ninguna forma de cargar 
piD^amas como no sea digitandolos cada vez que 
*e los necesita. Ademas, el ordenador posee solo 
4 K de memoria, de modo que hay poeo iugar para 
aigo mas que unos pocos programas modestos en 
basic. EUo significa que, casi para cualquier uso 
serio, son esenciales la impresora y la cassette 
opcionales. 



Sharp PC-1500A 



El otro ordenador portatil de Sharp, el PC- 15 00 A, 
es un desarroUo de un modelo anterior (el PC- 
1500) y esta diseriado con el objetivo puesto en un 
usuario mas serio. Mide 195 X 85 x 25 mm y pesa 
375 g, con lo cual su peso es tres veces mayor que el 

del FG-1251. 

El PC-1500A posee un teciado mejor que el de 
su hermano y una visualization ligeramente mas 
grande. La anchura de la LCD se amplia minima- 
mente (26 caracteres en lugar de 24) y en la maqui- 
na mas grande ha desaparecido la faeilidad del PC- 
1251 para regular la pantaila. 

La version de basic, sin embargo, constituye una 
gran mejora respecto a la otra. Las variables pue- 
den tener nombres de dos letras y se puede utilizar 
el mismo nombre para variables en serie y numen- 
eas sin producir ninguna confusion. Asimismo, el 
basic soporta algunas utiles facilidades para grafi- 
cos y sonido, En la LCD se pueden dibujar patro- 
nes con una resolution de 7 filas por 156 columnas, 
mediante el empleo de la instruction G PRINT para 
definir cada una de las columnas de siete puntos. 
La instrucci6n BEEP de la maquina permite contro- 
lar el tono y la durati6n de las notas, que son mo- 
deradamente fuertes. 

El ordenador tiene incorporados un calendano y 
un reloj, a los cuales se puede acceder mediante la 
variable TIME. El ordenador mantiene la hora aun 
cuando este apagado, de modo que una vez puesto 
en hora se mantiene haciendo tictac. Esta faeilidad 
seria una adicion muv util para todos los micros 
personates. El PC-1500A posee en su basic otxas 
varias instrucciones que lo colocan exposition ven- 
tajosa respecto a muchos micros. Estas incluyen 
una instruction ON ERROR GOTO y facilidades de 
rastreo (TRON y TROFF), Posee la generosa cifra de 
39 mensajes de error para el ordenador estandar; 
hay otros 16 disponibles para instrucciones utiliza- 
das solo con unidades accesorias. No obstante, al 
igual que el PC- 1251, estos mensajes de error se 
visualizan en forma de numeros, por lo que podrian 
mejorarse con texto* 

La fila superior de las teclas alfabeticas tiene pro- 
gramadas palabras clave del basic, y para identifi- 
car las 10 instrucciones se les puede instalar encima 
una plantilla plastica. El motivo por el cual Sharp 
decidio no imprimir estas instrucciones directamen- 
te en la carcasa es todo un misterio: es muy facil 
que la plantilla se pierda. Las seis teclas de encima 
del teciado principal pueden tener programadas 
hasta 18 funciones. 

Los usuarios del PC4500A tendran que escnbir 
la mayoria de su software: son pocas las empresas 
que producen programas para la maquina, y la pro- 
pia Sharp vende solo una cinta de programas selec- 
cionados. Con la maquina se surninistra un libro 
con los listados de 53 programas, con diversas aph- 
caciones para cinco areas principales: matematicas, 
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estadistica, electricidad, oficina y juegos, Estos 
programas se escribieron originalmente para el PC- 
1500, pero todos ellos funcionan a la perfection en 
el PC-1500A porque la unica diferencia entre los 
dos modelos es la cantidad de memoria RAM dis- 
ponible. El modelo anterior tenia 3,5 K de memo- 
ria, mientras que el PC-1500A posee 8,5 K, 

Mediante una ranura para cartuchos situada en 
la cara inferior de la maquina se puede incrementar 
la cantidad de memoria disponible. Se ofrecen cua- 
tro carruchos de memoria y todos ellos son bastante 
caros. Los paquetes de memoria estandares de 4 y 
8 K conservan su contenido solo mientras estan en 
la maquina. Otros dos cartuchos poseen pilas, de 
modo que conservan su contenido aun cuando se 
los extraiga del ordenador. Estos poseen una capa- 
cidad de 8 y 16 K T respectivamente. 

La unidad interface para impresora* plotter y cas- 
sette represents una mejor relation precio/presta- 
ciones, La interface para cassette permite salvar y 
cargar programas con una grabadora de cassette 
comun, y Sharp ofrece su propia grabadora de cas- 
sette compatible. La parte impresora/plotter de la 
unidad utiliza cuatro lapices de punta esferica para 
dibujar letras y graficos de buena calidad a cuatro 
colores. Es casi identica a otras muchas impresoras- 
/plotter que existen en el mercado de ordenadores 
personates, pero el papel que utiliza es de solo 
57 mm de ancho, to que constituye una gran limita- 
tion. 

El basic incluye un juego complete de instruccio- 
nes para utilizar la impresora/plotter. Estas son: 
CSIZE para producir letras de diferente tamano. RO- 
TATE para imprimir caracteres de forma apaisada o 
invertida, COLOR para seleccionar el color del lapiz, 
IF para desplazar e! papel hatia arriba y baaa 
abajo, LPRINT para rmpriniir texto, LCURSOR y 
GLCURS0R para despJazsr el lapiz en iDodaMdades 
texto v «iatioas, S0R6H para esiabtecer el margen, 
y UNE'y RUNE para dibujar una lioea entre dos pan- 
tos empleando coordenadas absoluias y relativas, 
re^pectrvamente. La unidad para impresora'pk)tter 
y cassette se summistra en su propia carcasa, junto 
con accesorios tales como un transformador de co- 
rriente (con un cable para un enchufe comun) para 
alimentar sus pilas recargables. 

PaTa el PC-1500A se producen otros dos acceso- 
rios importantes. Uno de ellos es una interface 
Centronics y RS232, que permite a la maquina co- 
municarse con impresoras y ordenadores de tama- 
no natural Al otro periferico se lo denomina table- 
ro de software. Este dispositivo es un gran teciado 
sensible al tacto que posee 140 teclas definibles que 
se pueden programar para llevar a cabo tareas utih- 
zadas comunmente (como calcular totales de forma 
automatica en aplicaciones de hoja electrdnica), 
Dado que el tablero de software es caro y para su 
operaci6n requiere la interface, el precio de esta 
faeilidad de ampliation es mas bien prohibitivo. 

A pesar de que el PC-1500A se puede ampliar 
convirtiendolo en un sistema potente con muchas 
facilidades de calidad notable, hay muchos sistemas 
de micros de precio similar que son mas versatiles y 
(lo mas importante) estan apoyados por una gama 
de software mas amplia. Con su intento por enca- 
bezar la liga de los ordenadores de peso ligero, el 
PC-1500A corre el peligro de verse aventajado con 
holgura por muchisimos pesos medios mas 
potentes. 



Cajade las pilas 

Contiene las cuatro pilas 
neces arias para que 
luncione el ordenador 




Puerta para cartuchos 

EsSe interface permite instalar en 
el Pf>1 500 paquetes de RAM 
adicional. Tambien se puede 
co nectar a la interface para 
impresora/cassette o a una 
interface RS232 




Encfiufs red 

Co mo alternate al empleo 
de pilas, el ordenador puede 
funcionarcon lacorriente 
de la red mediante un 
transformador adecuado 



ROM de basic 

Este chio contiene el 
basic Microsoft que utiliza e! 
ordenador 



Extra Sharp 

El Sharp PC-1251 se instala en la unidad 
impresora/microcassetle CE-125, Esta contiene una impresora 
termica (24 caracteres por linea) y una grabadora de 
microcassette. La unidad mide205 x 149 x 23 mm. 
El Sharp PC-1500 es el centro de una familia ampliada de equipos 
Sharp, y conectable en interface a travel de la interface RS232C/ 
en paralelo CE-158 a prdcticamente cualquier si sterna de micro u 
ordenador central. La interface CE-15Q, para impresora a 
color/cassette, es un plotter X-Y a cuatro co lores con nueve 
tamartos de caracteres y op clon para grlficos. La interface para 
cassette permite la conexi6n con dos grabadoras de cassette. 
Los modulos de memoria CE-151 , CE-155, CE-1 59 y CE-1 61 son 
una gama de paquetes CMOS de RAM de entre 2 y 16 K 5 algunos 
de los cuales contienen ROM programable. El CE-1 53 Software 
Board es un teclado al tacto de 140 teclas para entrada 
formateada. 




Chips de RAM 

Proporcionan los 8,5 K de 
memoria, de los cuateshay 
6,6Kdispomblesparael 
usuano 



SHARP 
PC-15O0A 

DIMENSIONS 

195 x 85 x 25 mn 
PESO 

375 g 



8,5 K de RAM 
PANTALLA 
LCD de 1 x 26 carac: 
OBSERVACIOHES 

Calendario y reloj 
incorporados; buen basic; 
memoria am pi table; enorme 
gama de perifericos 



Chips de visualizacibn 

Estos cuatro chips tratan la 
visualizacibn en la pantalla 
LCD 



SHARP 




PC-1251 




DIMENSIONS 


135 x 70 x 10 mm 


PESO 

115 g 




MEMORIA 




4 K de RAM 


PANTALLA 





LCD de 1 x 24 caracteres 



Chip de E. S 

Maneja la gestion de los 
perifericos extemos, tales 
como impresora csssefj 



Placa de circuito imprest) 

Para conseguir la maxima 
densidad, la placa se ha dividido 
en dos mitades, conectadas 
mediante un par de cables 
pianos. Observe la escasez 
de componentes: estos se 
han apinado en los 
microchips CMOS 



OBSERVACIOHES 

Tres modaHdades de 
funelonamiertto; 18 teclas 
def inibles por el usuario; 
dispone de 
cassette/impresora 




Sharp 
PC-1251 

5 ;": :: " v i ~ri 
calculation como su 
sistema de gestion de uso 
diario (probablemente mas 
para, el tngenieroy el 
cientificoqueparael 
administrador); las 
diminutas teclas de letras de 
su teclado QWERTY hacen 
que la entrada de textos 
resulte dificil y cansada 



Sharp 
PC-1500A 

" 7 2 - Z ; ■ I z "E"**"" 15 _ " i 

argumentos de venta son 
su potenciaysu eQuipo 
op cional, y podrt'a en efecto 
contribuiren gran medEdaa 
aliviar la cuota de trabajo de 
oficina. Sin embargo, es 
probable que selo 
con sid ere s6lo como on 
juguete para ejecutivos y 
una calculadora notable 
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Programacion Juegos de aventuras 



Dibujo de imageries 

Esta vez disenaremos visualizaciones de pantalla para el 
Spectrum con el fin de ilustrar dos escenarios de "Digitaya" 



El diseno de la pantalla ALU implies el desplaza- 
miento de las letras A, L y U hasta el centre de la 
pantalla utilizando graficos en alta resolution. En el 
BBC Micro, este desplazamiento se efectuaba di- 
bujando la letra desde tin punto de partida especifl- 
cado empleando instrucciones para dibujo relativo, 
boirandolas luego, desplazando el punto de partida 
y repitiendo todo el procedimiento. La misma idea 
se puede aplicar en la version para el Spectrum. 

La instruction DRAW del Spectrum permite solo 
el dibujo relativo (es deeir, partiendo desde el ulti- 
mo punto especificado), pero es ideal para esta par- 
ticular aplicaci6n de desplazamiento. Trazando 
(PLOT) un punto de partida initial y llevando luego 
a cabo una serie de instrucciones DRAW para crear 
la forma de la letra, podemos desplazar facilmente 
todo el diseno complcto de la letra alrededoT de la 
pantalla, con solo cambiar las coordenadas del 
punto trazado inicialrhente. El borrado se puede 
obtener dibujando la misma forma en la misma po- 
sition, pero con todos los colores invertidos. Este 
efecto se activa mediante INVERSE 1 y se desactiva 
mediante INVERSE 0, For lo tanto, para cada posi- 
tion que ocupe la letra la dibujaremos dos veces: 
una vez con INVERSE 0, para hacer aparecer la 
forma, y otra vez con INVERSE 1 para borrarta. 

Si tomamos el ejemplo de la letra A, que se des- 
plaza desde la izquierda, podemos colocar todas 
estas instrucciones dentro de un buck FOR... NEXT. 
Este bucle incrementa el valor de la coordenada x 
del punto trazado initialmeme para la forma. Ani- 
dada en el interior de este bucle hay una segunda 
estructura FOR.. .NEXT que simplemente lleva a 
cabo dos veces las instrucciones de dibujo. El ulti- 
mo valor de X es 55, que denota la position de des- 
canso final de la letra en la pantalla. Obviamente, 
no deseamos borrar la version final de la letra, de 
modo que se inserta una condition para asegurar 
que la letra se borre (cambiando a INVERSE 1) solo 
si la coordenada X es menor que 55. Los principios 
analizados aqui tambien se apt i can a las otras dos 
letras para hacer que la L se desplace hacia arriba 
de la pantalla y la U lo haga desde la derecha. 



Diseno esquematico de la 
ALU 

Cuando se diseria una pantalla grafica es importan- 
te hacer un esquema del diseno sobre papel y reali- 
zar un calculo initial de los valores de las coordena- 
das que tendra cada forma en la pantalla. Ademas, 
tambien se han de situar todas las letras a imprimir 
en la pantalla, en terminos de filas y columnas. La 
instant anea de la pantalla nos muestra tal disefio, 




con las dimensiones de esta en unidades de graficos 
y de caracteres. 

Las palabras AND, OR y NOT se visualizan en la 
pantalla utilizando la instruction PRINT AT r,c: sien- 
do r el numero de filas desde la parte superior de la 
pantalla, e indicando C el numero de columnas 
desde el margen izquierdo. Los botones se dibujan 
empleando CIRCLE x,y T r. donde se especifican las 
coofdeaadas del centre y la longitud del radio. 

Compleiadas las mtuias de dibujo, el programa 
espera a que se pulse una tecla antes de restablecer 
INK y PAPER a los colores originates y limpiar la 
pantalla, Despues retorna a la rutina ALU princi- 
pal. La pulsation de tecla se trata mediante SNKEYS; 
de no pulsar se ninguna tecla, entonces se repite la 
condition. Para llamar a esta subrutina se debe in- 
sertar esta linea en el programa Digitaya: 

4565 GOSUB 7000:REM S/R IMAGEN ALU 
La pantalla de la puerta para la palanca de mando 
esta disenada para disparar rayos laser desde el 
ccntro de un conector para palanca de mando. Las 
patUlas del conector son caracteres de punto impre- 
sos en la pantalla y el contomo tipo D se dibuja 
empleando graficos en alta resolution. Para confe- 
rirle a la imagen una sensation de profundidad, se 
dibuja en el primer piano una serie de lineas cscalo- 
nadas. El punto de partida de cada linea se hall a cn 
la linea del horizonte y se selecciona mediante una 
instruccion PLOT. El final de cada linea esta en la 
parte inferior de la pantalla. Las Kneas estan sepa- 
radas por intervalos de una unidad en el horizonte, 
ampliandose la separation a siete unidades en la 
parte inferior de la pantalla. 

El hecho de que la instruccion DRAW del Spec- 
trum sea relativa hace que la rutina sea ligeramente 
mas complicada que si pudieramos especificar un 
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punto final absolute Si la coordenada X del pun to 
de partida de la linea situada m&s a la izquierda es 
111, entonces debemos efectuar un calculo basado 
en ello para hallar el desplazamiento relativo hasta 
el punto final. El bucle FOR... NEXT de las lineas 
8030-8060 muestra este calculo. 

Como antes, es util esquematizar las dimensio- 
nes y las coordenadas del diserio sobre el papel 
antes de ernpezar a escribir el codigo. La instanta- 
nca de la pantalla nos muestra tal diseno: 




Los rayos laser se dibujan desde la puena para la 
palanca de mando mediante el desplazamiento 
hasta un punto del centro de la puerta y dibujan do 
(DRAW) luego una linea hacia un punto del horizon- 
te escogido al azar, utilizando un color INK seleccio- 
nado al azar, Repitiendo el procedimiento con IN- 



VERSE 1 ? podemos borrar la linea, hacer que el haz 
aparezca solo durante un breve intervalo (creando 
un efecto de relarnpago). Sin embargo, al borrar la 
linea surge un problema. Dado que el rayo se di- 
buja desde un punto situado cn el centro de la 
puerta, atraviesa los graficos dibujados previamen- 
te y que representan a la puerta propiamente dicha. 
Cuando se borra la linea aparecen agujeros en el 
grafico de la puerta, y, por consiguiente, al borrar 
la linea es necesario volver a dibujarlo. 

Aun cuando el final de cada linea dibujada desde 
la puerta para palanca de mando se detiene j us to 
antes de la linea del horizonte, este se ve afectado. 
Debido a la forma en que el Spectrum controla el 
color, la portion del horizonte mis pr6xima al 
punto donde termina el rayo adquiere el mismo 
color que el utilizado para c&bujar la linea, Ello se 
debe a que el Spectrum solo puede soportar on 
color INK y un color PAPER dentro de una celda de 
caracter; cualquier grafico que estuviera ya presen- 
te dentro de la celda tomara al color de primer 
piano del nuevo color INK empleado en la celda. 
Por consiguiente, ademas de volver a dibujar la 
puerta para palanca de mando, tambien se debe 
voher a dibujar la linea del borizoote despues de 
borrar un rayo. La rutin a continua disparando 
rayos laser hasta que se efeciua una pulsation de 
tecla. en cuyo momento el control de progiama re- 
torna a la rutina de la puena para palanca de 
mando principal, despues de haber restabletido los 
colores INK y PAPER normales. Para llamar a esta 
sub rutin a se debe insertar esta linea: 

3845 GOSUB BOOOrREM IMAGEN PUERTA PALANCA 
MANDO 



Pantalla ALU 

7000 REM***s/rimagenalu *** 
7010 IMK6:PAPER OrCLS 
701b : 

7017 REM letra A 

7020 FOR x=0 TO 55 STEP 5 
7030 INVERSE 0 
7040 FOR 1=1 102 
7B50 PLOTx.100 

7 v.: :-,m:: 
:=va : :: 

7080 DRAW 15, -20 



7110 
7115 
7120 
7130 
7140 
7150 
7152 
7155 
7160 
7170 
7180 
7190 
7200 
7210 
7220 
7230 
7240 
7250 
7260 
7270 
7280 
7290 
7300 
7310 



NEXT i 
NEXTx 



5Ei 



REM **** letra L"«* 

FORy=100 TO 150 STEP 5 

INVERSE0 

FOR i=1 TO 2 

PLOT 113,y 

DRAW 0,-50 

DRAW30,Q 

IF y<1 50 THEN INVERSE 1 

NEXT i 

NEXTy 

REM *"* letra U **** 

FORx=225TO170STEP-5 

INVERSE 0 

F0Ri=1 TO 2 

PL0Tx,150 

DRAW 0,-50 

DRAW 30,0 

DRAW 0,50 

IF x>1 70 INVERSE 1 



7320 mxi i 

7330 NEXT* 
7340 : 

7350 REM** # "botones 
7360 PRINT AT 10,7; 'AND' 1 
7370 PRINT AT 10,1 5; "QR" 
7330 PRINT AT lO^'NOT" 
7390 INK 3: CIRCLE 70,80,5 
7400 INK 4;CIRCLE 128,80,5 
7410 «NK5: CIRCLE 185,80,5 
7420 : 

7430 REM ****signo?"" 

7435 INK 6 

7440 PIOT 113.45 

7450 DRAW 0.15 

7i60 DRAW 30.0 

7470 DRAW 0.-20 

7480 DRAW -15.0 

7490 DRAW0 r ~7 

7500 FOR f =6 TO 0 STEP -2 

7510 CIRCLE 1 28,23, r 

7520 NEXTr 

7530 : 

7540 IFINKEYS--'"THENG0TO7540 
7550 INK0:PAPER7:CLS 
7560 RETURN 

Pant, puerta para pal. 
mando 

8000 REM s/rimagen puerta pal. mando 

8010 INK6:PAPER0:CLS 

8020 REM **** primer plane**" 

8030 FOR n=1 TO 31 

8040 PLOT1l2+n,50 

8050 DRAW7'n-112.-50 

8050 NEXT n 

8070 : 



8080 REM **'* horizonte **** 
8085 INK 6: INVERSE 0 
8090 PLOT 0,50 
8100 DRAW 255.0 
8110 : 

8120 REM '*** puerta"** 

8130 PRINT AT 1 , 1&; M JOYSTICK PORT" 

8140 PRINT AT 3, 20;" " 

8150 PRINT AT 5, 21;". . . 
8160 PL0 158,152 
8170 DRAW 75.0 
3180 DRAW 1.-1 
8190 DRAW 1,-1 
8200 DRAW0 P -1 
8210 DRAW -1,-1 
8220 DRAW -10,-25 
8230 DRAW -2,-2 
3240 DRAW -52,0 
8250 DRAW -2,2 
8200 DRAW -10,25 
8270 DRAW -1,1 
8280 DRAW -1,1 
8290 DRAW0J 
8300 DRAW 1,1 
8310 : 

8320 REM **"asp£Ji] 
8340 INK RND*7 
835C _r ^ 1 : Z::- 
8360 LETy=-35 
8355 INVERSE© 

nr z : z - _ : : 
ir: ^ 

8380 DRAWx y 

aa \£>~ 

8400 REM co mprobar tecla **** 

3410 IF INKEYS= u " THEN GO TO 8080 

8415 INVERSE 0 

3420 INK0:PAPER7:CLS 

8430 RETURN 



Patrones de enrejado 

Veamos como se pueden crear las cuadnculas en que se basan 
los patrones en dos dimensiones ______ 



Si, en vez de trasladar el motive que definimos en 
el capitulo anterior a lo largo de una tinea, permiti- 
mos que se produzcan simultaneamente dos trasla- 
ciones no paralelas, entonces nuestro patron se 
convierte en bidimensionah Comenzaremos a in- 
vestigar este conjunto de patrones utilizando como 
unidad un unieo punto. 

TO PUNTO 

PD FD 1 BK 1 PU 
END 

El procedimiento para llevar a cabo estas traslacio- 
nes simultaneas se define del siguienie modo: 

TO CUADRICUU :PARTfDAX :PARTIDAY :XPAS0 
:YPAS0 :ANGUL0 DRAW HT PU 
SETXY :PARTIDAX :PARTIDAY SETH 0 
REPEAT 3 [UNEA :XPAS0 ABAJO :YPAS0 
;ANGUL0J 

END 

Este procedimiento dibuja una cuadricula de nueve 
puntos. Las entradas dan las coordenadas del punto 
de partida, el tamano de los pasos X y Y, y la orien* 
tacion de los puntos correspondientes de la siguien- 
te fila desde la fila actual. 

Este es el procedimiento LINEA: 

TO LINEA :X 

REPEAT 3 [UNIDAD SET* XCOR-.X] 

SETX XCOR-3* X 
END 

dibuja una unica tinea de ties unidades a traves de 
la pantalla, y despues devuelve la tortuga a su 
punto de partida, 

De momento, el procedimiento UNIDAD es sim- 
plemente un punto: 

TO UNIDAD 

PUNTO 
END 

Otro procedimiento: 

TO ABAJO :Y :A 

SETH :A 

FD :Y 

SETH 0 
END 

desplaza la tortuga hasta la fila siguiente (tal como 
lo nemos utilizado, ha supuesto el desplazamiento 
hacia "abajo" hasta la siguiente fila, de ahi el n om- 
bre del procedimiento), y luego restaura la orienta- 
tion. En el diagram a se ofrecen los cinco tipos de 
enrejado piano, junto con los procedimientos en 
logo para dibujarlos. 

A partir de combinaciones de estas cuadriculas 
basicas se pueden obtener muchos patrones dife- 
rentes, si bien probablemente sea mas interesante 
modihear el procedimiento para que dibuje una 



linea en diversos angulos en vez de recta a travel de 
la pantalla. 

Otra linea de investigation es ver como se puede 
perfeccionar la simetria de cada una de las cuadri- 
culas anadiendo a ia unidad dibujada en cada punto 
diversas form as de simetria. Existen 17 de tales pa- 
trones y todos ellos se pueden apreciar en el segun- 
do diagrama. Un metodo obvio para dibujar estas 
17 posibilidades consiste en reemplazar la instruc- 
ci6n UNIDAD del procedimiento LINEA por un proce- 
dimiento que dibuje la forma en ese punto, 

La forma unidad 

Las formas unidad se consiguen a partir de un moti- 
ve* basico junto con diversas reflexiones y rotacio- 
nes. A modo de demostracidn, vamos a definir 
nuestro motivo basico, al cual llamaremos LIT. 
(Como antes, este es de estado transparente y no 
emplea ningun procedimiento.) 

TO LIT 
PD 

FD15 
RT90 

r : 5 

BK 5 
LT90 
BK 15 
PU 
EM 

Podemos utilizar los procedimientos que desarro- 
llamos en el capitulo anterior para crear dos proce- 
dimientos: MOTIVO y su imagen de espejo, I. MO- 
TIVO: 

DEFINE "MOTIVO TEXTO "LIT 
DEFINE "I. MOTIVO REESCRIBIR " LIT 

Ahora podemos definir las formas unidad. Por 
ejemplo, las unidades para los patrones 7 y 17 se- 
rian las siguientes: 

TO UNIDAD7 

LT 90 MOTIVO RT 90 
END 

TO UNIDAD17 
RT 30 

REPEAT 6 [MOTIVO I. MOTIVO RT 60] 
LT30 
END 

Si vuelve a observar el procedimiento LINEA, vera 
que el mismo ejecuta el procedimiento UNIDAD. 
Por consiguiente, con el fin de dibujar el patron 7, 
por ejemplo, se debe modificar el procedimiento 
UNIDAD de modo que rece UNIDAD7. Esto lo hace- 
mos mediante el empleo de DEFINIR.UNIDAD7, 
donde: 
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TO DEFINIR.UNIDAD :NUM 
• DEFINE "UN I DAD TEXT PALABRA "UNIDAD :NUM 
END 

Ahora ejecutaremos al mismo tiempo las partes de 
un patron para dibujar la cuadrfcula y dibujar la 
unidad. 

Un procedimiento denominado PAT nos permite 
hacerlo: 

TO PAT :CUADRICULA :NUM :PR0C 

DEFINE "MOTIVO TEXT :PR0C 

DEFINE "I.MOTIVO REESCRIBIR :PR0C 

DEFINIR.UNIDAD :NUM 

RUN (LIST :CUADRICULA) 

ERASE MOTIVO 

ERASE I, MOTIVO 

ERASE UNIDAD 
END 

Para dibujar el patron 17 ahora digitaremos: 

PAT "HEX 17 "LIT 
Esto dibuja una cuadricula hexagonal, con UNI- 
DAD17 en cada punto. utilizando LIT como motivo 
basico. 

Este metodo funciona bien para todos los patro- 
nes, excepto para el 4, el 6. el 7 y el 12. En estos 
casos, la forma unidad no es la misma en cada 
punto, sino que sufre una transformation (refle- 
xion, rotation o ambas a la vez). Una forma de tra- 
tar esta cuestion consiste en incorporar estas trans- 
formaciones a los procedimientos LINEA y ABAJO. 
De modo que vamos a definir TRANSX como la 
transformation a aplicar a la traslacion basica a tra- 
ves de la pantalla, y TRANSY sera la transformation 
a aplicar entre filas. Entonces LINEA y ABAJO se 
convierten en: 

TO LINEA :X 
REPEAT 3 [UNIDAD SETX XCOR XC0R+:X 
TRANSX] 

SETX XC0R-3*:X 
END 

TO ABAJO :Y :A 

SETH -A 

FD :Y 

SETH 0 

TRANSY 
END 

Ahora definimos el patron 7 como: 

TO PATR0N7 :PR0C 

DEFINE "TRANSX[[] [REFLEXION RT 180]] 

DEFINE "TRANSY[[][]] 

PAT "RECT 7 :PR0C 

ERASE TRANSX 

ERASE TRANSY 
END 

Para utilizarlo, entre PATR0N7 "PATA. Tras ejecutar 
el procedimiento anterior, TRANSX se faabra dcfini- 

do como: 

TO TRANSX 

REFLEXION 

RT 180 
END 

REFLEXION se utiliza para reflejaT el patron unidad. 
Este procedimiento se define reescribiendo el pro- 
cedimiento UNIDAD: 



Los diecisiete grupos pianos 

Clave: Cuadrangular 
P = enrejado de paralelogramo 
R = enrejado rectangular 
G = enrejado romboidal 

S = enrejado cuadrangular S4{R0S=4) 

H = enrejado hexagonal 

ROS = orden rotacional de simetrfa 

M = reflexion de espejo 

G = reflexttin con deslizamiento 

Paralelogramo 



+ + 




P1(R0S = 1) 



P2(RQS=2} 

Rectangular 



RG(R0S=1) 



RMM(R05=2) 



RGG(R0S=2) 

Romboidal 
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CM(R0S=1) 



CMM(R0S-2) 



-i H 



S4M(R0S=4) 



&4G(R0SM) 



Hexagonal 



+ 



H3(B0S=3) 



H3M1(R0S-3) 



H3M2(R0S=3) H6(JtOS=6) 
N6M(ROS=6) 



Inicio del enrejado 

Los 17 patrones pianos que 
vemos aquf estan agrupados 
de acuerdo a sus patrones de 
enrejado basicos. H3M1 y 
H3M2, por ejempio, se basan 
en un enrejado hexagonal, 
poseen un orden de Sim etna 
de 3 e incorporan una 
reflexion de espejo. Solo 
difieren en que el primero 
tiene un eje de reflexion a lo 
largo de Jaalmeas dela 
cuadrfcula, y el segundo hacia 
abajo del eje vertical - 



Los cinco 
tipos de 
enrejado 
de piano 



Paralelogramo 

TO PARALEL 

CUADR(-60) 90 80 50 205 
END 



Romboidal 

TO ROMB 

CUADR(-30) 90 80 80 225 
END 



Rectangular 

TO RECT 

CUADR(-80)9080 50 180 
END 



Cuadrangular 

TO CD ADR ADO 

CUADR{-80) 908080180 
END 



Hexagonal 

TO HEX 

CUADR(-30)9080 80210 
END 



TO REFLEXION 

DEFINE "UNIDAD REESGRIBIR "UN I DAD 
END 

La reescritura supone ahora sustituir RT por LT ? y 
viceversa, asi como MOTfVO por l.MOTIVO y vice- 
versa. 

Nuestra version previa del procedimiento de 
reescritura solo intercambiaba RT y LT. Para modi- 
ficar esto, todo cuanto hemos de hacer es modificar 
CAMBIAR.PALABRA, que ahora se convierte en: 

TO CAMBIAR.PALABRA :PAU\BRA 

IF (ANYOF :PALABRA=" RT :PALABRA= M RIGHT) 
THEN OUTPUT "LEFT 

IF(ANY0F :PALABRA="LT :PALABRA= i, LEFT) 

THEN OUTPUT "RIGHT 

IF :PALABRA="M0TIV0 THEN OUTPUT 

'l.MOTIVO 

IF :PALABRA- 1E l.MOTIVO THEN OUTPUT 
"MOTIVO OUTPUT :PALABRA 
END 

Otra forma de abordar este problerna sena utilizar 
la versi6n de REESGRIBIR que tambien modifica los 
subprocedimicntos del procedimiento dc entrada. 
Esta version la ofrecemos entre las respuestas. 

Para la mayoria de los patrones el movimiento 
entre puntos es simplemente una traslacion, y no 
hay que [levar a cabo ninguna otra transformation. 
TRANSX y TRANSY, en consecuencia, no haccn 



nada, PATR0N17 constituye un ejemplo de este 
tipo: 

TO PATRON 17 :PR0C 

DEFINE "TRANSX[[][ 

DEFINE "TRANSY[[][ ! 

PAT"HEX17:PROC 

ERASE TRANSX 

ERASE TRANSY 
END 

Habiendo cubierto todas las posibilidades basicas, 
dejamos en sus manos la definition del resto de los 
patrones. 



Complementos al logo 

Para todas las versiones LCSI: 

Emplee CS en lugarde DRAW 

Emplee OR en lugarde ANYOF 

SETPOS, seguido de una lista, se utiliza en lugar 

de SETXY 

IF posee una sintaxis diferente: 

IF:PALABRA=MOTIV0[OUTPUT "l.MOTIVO] 

En el logo Atari TEXTy DEFINE no existen como 
primitivas, si bien en el manual se ofrece un 
metodo para definirlas 



Respuestas a los ejercicios 

1 . Para hacer girar una forma alrededor del punto 
(X,Y) en un angulo de A grados: 



0 ORIENTACION 
XANTXCOR 
YANT YCOR 

R SORT (:XANT-:X)*(:XANT- 
:YANT-:Y)*(:YANT-:Y) 



:XANT :YANT 



TO ROTAR :X :Y :A 
PU 

MAKE 
MAKE 
MAKE 
MAKE 

:X)+ 
PU 

SETXY :X :Y 
SETH TOWARDS 
RT :A 
FD:R 

SETH:0+:A 
PD 
END 

2. Un procedimiento para reescribirque tambien 
reescriba subprocedimientos. 

MAKE "PR0CEDS.HECH0S[] 

TO REESGRIBIR :PR0C 
MAKE "PROCEDS.HECHOS FPUT :PR0C 
:PROCEDS.HECHOS 

OUTPUT REESCRIBIR.PROC TEXT :PR0C 
END 

TO REESCRIBIR.PROC :TEXT0 
IF :TEXTO=[]THEM 0UTPUT[] 
OUTPUT FPUT REESGRIBIR, LINEA FIRST 
TEXTO REESCRIBIR.PROC BUTFIRST 
:TEXT0 

END 



TO REESGRIBIR. LINEA :LINEA 
IF :LINEA=[] THEN 0UTPUT[] 
IF LIST? FIRST :LINEA THEN OUTPUT FPUT 
REESCRIBIR. LINEA FIRST :LINEA 
REESGRIBIR. LINEA BUTFIRST :LINEA 
OUTPUT FPUT CAMBIAR.PALABRA FIRST 
tLINEA REESCRIBIR.LINEA BUTFIRST :LINEA 

END 

TO CAMBIAR.PALABRA :PALABRA 

IF (ANYOF :PALABRA=-'RT ;PALABRA= 

"R!GHT)THEN OUTPUT "LEFT 

IF (ANYOF :PALABRA="LT :PALABRA= 

"LEFT) THEN OUTPUT "RIGHT 

IF PROCEDIMIENTO? :PALABRATHEN 

SUBPROCEDIMIENTO :PALABRA OUTPUT 

WORD "£:PALABRA 

OUTPUT :PALABRA 

END 

TO PROCEDIMIENTO?:NOMBRE 

IF NUMBER? :NOMBRE OUTPUT "FALSE- 

IF LIST? :NOMBRE OUTPUT "FALSE 

TEST WORD? :NOMBRE 

IFTRUE IF WORD? TEXT :NOMBRE OUTPUT 

"FALSE ELSE IF NOT 

(TEXT :NOMBRE=[]) 

OUTPUT "TRUE 

OUTPUT "FALSE ' 
END 

TO SUBPROCEDIMIENTO :PALABRA 

IF MEMBER? :PALABRA :PRODECS.HECHOS 
THEN STOP 

DEFINE (WORD "£:PALABRA)REESCRIBIR 
:PALABRA 
END 
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Desplazamientos visuales/Lenguaje maquina 



Adagio ma non troppo 

Vamos a crear una rutina que desplace horizontalmente un dibujo 
de fondo en una pantalla del Commodore 64. Es obvia su utilidad 
en programas de juegos 



El VIC o controlador de video del Commodore 
puede desplazar hasta ocho pixels la visualization 
en pantalla, en las dos direcciones. El desplaza- 
miento horizontal reguia par medio de los tres 
bits inferiores correspondientes al registro del VIC 
situado en la position 53270 (SD016). Si se van asig- 
nando valores progresivamente a estos tres bits del 
7 al 0 ? la pantalla se va desplazando un pixel a la 
izquierda a cada valor. En basic se emplearia esta 
sentencia: 

POKE 53270\(PEEK(53270)AND 248)+P 

donde P tiene un valor entre 0 y 1, 

Combinando esta facilidad con una rutina en co- 
digo maquina para desplazar todos los datos de la 
pantalla una posicion a la izquierda e introducir una 
nueva col urn na dc datos en el marge n derecho, es 
posible obtener un suave efecto de desplazamiento. 
La pantalla ha de reducirse a 38 columnas (en lugar 
de las normaies 40 columnas) para que los datos 
aparezcan y desaparezcan de nuestra vista en un 
pausado desfile. El cambio al mode 38 columnas se 
realiza poniendo a cero el bit 3 del registro de los 
desplazamientos horizon tales, En basic se hace asi; 

POKE 53270 ! PEEK(53270)AND247 

La pantalla volvera a sus 40 columnas normaies po- 
niendo de nuevo el bit 3 a uno. 

El diagrama de flu jo muestra las diferentes ta- 
re as a realizar para producer ese suave raovimiento 



horizontal lmporta anadir que si movemos o inser- 
tamos datos de pantalla, hay que hacer similares 
cambios en los datos del color, 

Cambio de los datos 
de pantalla 

Se trata de una tarea en principio faeil. Los datos 
de pantalla se suelen guardar a partir de la posicion 
1024 (S0400): los primeros 40 bytes constituyen la 
fila superior, los siguientes 40 bytes la fila Inmedla- 
tamente inferior, y asi sucesivamente. Para dar la 
sensation de que los datos se mueven un lugar a la 
izquierda, basta con Uevar cada byte de dichos 
datos al byte que se encuentra debajo de la posicion 
original. Este fragmento de la rutina utiliza punte- 
ros de pagina cero y el direccionamiento indirecto 
para colocar cada byte de pantalla y color un byte 
mas abajo en la memoria. 

LI am an do SB a la direction ZJase del area de la 
pantalla (Screen), la ultima posicion de la fila supe- 
rior sera SB +39, la ultima de la fila inmediata infe- 
rior sera SB +79, etc. Para que los datos a desplazar 
sobre la pantalla puedan almacenarse de modo si- 
milar en la memoria (o sea, en paquetes de 1 000 
bytes), los datos a insertar por el lado derecho de la 
pantalla seran los bytes primero, 41-esimo, 81- 
esimo, etc., del area que reservamos para tales 
datos, Esto lo ilustramos con el siguicnte dibujo: 



MuGvase a voluntad 

El desplazamiento de as 
visualizations sobrs = zi~:i = 
y desde la memoria pasa por 
tres fases principals. Primero, 
cada byte de la memoria de 
pantalla se mueve hacia abajo 
una posicion. Debido al dEseno 
de la pantalla, sus filas son 
tratadas en la memoria como 
bytes consecutivos. Esto 
produce el efecto en pantalla 
como si cada caracter se 
moviera un lugar a la izquierda, 
a excepci6n de los cararteres 
que aparecen en la columna 
extrema izquierda de la i-c~:i \. 
En esta columna cada caracter 
parece como si apareciera en :a 
misma posicion pero en la 
columna extrema de recta. El 
caracter superior de la columna 
extrema izquierda desaparece 
durante el proceso danrio 
entrada a un caracter exrrano 
por la esq ui na inferior izquierda. 
La segunda fase se encarga de 
copiar la columna que nts^esa 
toma^ndola de la memoria y 
He va nd ola a la col urn n a ex:* e ™ a 
derecha de la pantalla. Los 
registros del chip VIC a cargo 
del desplazamiento pueden 
accionarse para dar I a sensaeion 
de que la pantalla se desplaza un 
pixel cada vez dentro del area 
visible 
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Lenguaje maquina/Desplazamientos visuales 



( ENTRADA \ 



Establecer el 
modo 38 columnas 



CoJocar la position de 

rJespl. en posicion ,-rias 

a fa derecha (P= 



Des plaza r dates de ; 
bant- una pos. a la rzqjft 



Insertar una columoa 
de dates en el 
margen derecho 



Mover la pantalla 
desde P=6 hasta P=D 



Poco a poco f suavemente 

Para conseguir un movimierrto 
suave podemos hacer uso de 
unafacilidad particular del VIC. 
Este chip esta dorado de unos 
registros especiales de 
desplazamrento que permiten a 
la pantalla visile mo verse de su 
posicidrr rnicial respecto a I 
encuadre, Es pos idle producir 
pixels individuates tanto en 
direccion horizontal como 
vertical. Combmando este efecto 
con el copied o de caracteres en 
codigo mciquina, podemos 
ootener un suave movfmiento 
sobre una pantalla reducida de 
38 columnas 



Al comieozo se establecera un puntero que apunte 
al byte que esta al comienzo del area de memoria 
que deseamos desplazar en pantalla. Una vez obte- 
mdo el desplazamiento, el puntero se incrementara 
en una unidad para que copie la columna siguiente 
en el margen derecho de la pantalla, desde donde 
puede desplazarse a la izquierda, Tras reiterar el 
proceso 40 veces consecutivas, se habra obtenido 
un desplazamiento de todos los datos de la panta- 
lla. El puntero sera entonces incrementado en 960 

unidades (1000-40) para apuntar al inicio dc la pan- 
talla siguiente. 

Este proceso debera ser repetido para el area de 
los datos de color. En resumen, haremos que ia di- 
reccion de cada byte en el mapa del color tenga un 
desplazamiento hacia la direccion del byte corres- 
pondiente en el mapa de datos de pantalla. El pro- 
ceso sera repetido para tantas pantallas de datos 
como se hayan disenado y guardado consecutiva- 
mente en memoria. Para utilizar la rutina del des- 
plazamiento, hay que enviar algunas in form aci ones 
previas. La rutina necesita saber: 

1) La dir. de inicio del area de memoria donde se 
guardan los datos de la pant, a desplazar. 

2) El desplazamiento a los correspond en tes datos 
de color. 

3) El numero de pantallas de datos a desplazar, 

4) Un valor de retardo que sirva para ralentizar la 
operacion del movimiento. 

Estos datos han de ser colocados (POKE) en posicio- 
nes reservadas dentro del prog, en cod. maquina, 



Toda direccion de inicio, desplazamiento y nu- 
mero de pantallas deben ser especificadas, aunque 
los resultados no seran muy espectaculares si no se 
ha puesto ningun dibujo en el area de memoria es- 
pecificada. Pucde comprobarse el programa car- 
gando y ejecutando el corto programa en basic que 
establece dos pantallas sencillas de datos que co- 
mienzan en la position 8192. El desplazamiento al 
area de datos de color es 3 000 bytes. Para mover 
esta area de datos en la pantalla, hay que propor- 

cionar la siguiente information en respuesta a las 

preguntas del programa que llama: 

1) Direccion de inicio, en 

decimal: 8192 

2) Desplazamiento del color; 3000 

3) Numero de pantallas; 2 

4) Retardo: 255 



Prog, de llamada en basic 

10 REM ' " T * 

20 REM 

30 REM " 

40 REM " PROGRAMA BASIC DE LLAMADA " 

"' . - -r ■■- :=«:azav vrz 
m rem - 

70 RfM ♦••**»*• 

V. -EV 

90 : 

S5 DN=S :RBI PARA CASS DM=1 
100 IFA=0T>CMA-1:ljrjM)'SCR0li.lEr.DHj 
110 POKE 55,0 : POKE 56.32: CLR : REM EXIRtMO INFERiOR McMCRLft 

115 REM GQSUB 1000 : REM B5TI B UE ". E i =UMJZAGWMSIWPt£ 

130 LMEM =49664: REM INICIO MEMORIA 

140 H MEM =49665: REM AREA 

150 LCOFF =49666: REM DESPLAZ. AL COLOR 

160 HCOFF -49667: REM MAPA 

170 NMSCR =49658: REM NUMERO PANTALLAS (SCREENS) 

\ 90 DELAY = 49669 : REM VALOR DEL RETAR DO [DE LAY) 

200 SCROLL =49670; REM DIRECCION INICIO PROGRAMA 

210 : 

220 REM PRINT CHRSf 147) : REM BORRA PANTALLA 
230 INPUT 'DIRECCION INICIO EN DECIMAL" ;SA 
240 HS - 1 NT(S A'256) :L$ - S A- HS *256 
250 POKE LMEM,LS: POKE KMEM.HS 

260 : 

270 INPUT "NUMERO PANTALLAS ' ;N$ 
290 POKE NMSCR ,NS 

300 : 

310 1 NPUT " DESPLAZ EN DEC I M AL AL MAPA COLOR " ; OS 
320 H0=INT(0S/256);LO=0S-HO*256 
330 POKE LCOFF, LO: POKE HCOFF, HO 

340 : 

350 iNPUT "VALOR DEL RETAR00>256'*;DV 
360 IFDV>255 OR DV<0 THEN 350 
370 POKE DELAY 7 DV 
330 : 

390 SYS SCROLL 

400 POKE 53270, PEEK {53270) OR % 



El programa carga el codigo maquina en la me- 
moria y pide la information necesaria a traves de 
instmcciones INPUT. El programa secciona la infor- 
mation en la forma LO-HI donde sea necesario y la 
coloca (POKE) en los espacios de almacenamiento 
dispuestos al comienzo del programa. Posterior- 
mente se llama a la rutina en codigo maquina, 



Cargador en basic 



CARGA 00 R EN BASIC 
PAR A RUTINA DESPLAZ 
HORIZONTAL 



TO REM 
15 REM ' 
20 REM * 
30 REM ' 
40 REM 
50 : 

60 FOR N49670 TO 49945 
70 READ A : POKE l„A 
80 CC=CC+A 
90 NEXT 

92 READ CSJF CSoCC THEN PRINT "ERROR SUMA CONTROL": STOP 
100 DATA1 73,22,208,41 ,247,1 41 ,22,208 
110 DATA1 74,4,1 94,1 60,40,138,72,152,72 
120 D AT A1 73,22.206,41 ,243,24,105,7,141 
130 DATA22,20fl,1 69,0,133,251 , 169,4, 133 
140 DATA252,169,0, 133,253,1 69,21 6,133 
150 DATA254,162,3,160,1, 177,251.136 
1 60 DATA1 45 , 251 , 200. 1 77 , 253 , 1 36 145 
170 DATA253, 200, 200.208,241 ,230,252 
180 DATAm 254, 177.251,1 SB, 252, 136 
190 DATA145.251. 200. 177.253. 195,254 

2o: cat-/ 2.7 ■ -z ::: :;: :i: ' 

210 da'*::: ::■ :•■ ■ ■- ni.m 

22C ^; l;° 2". -".253.136,145 

230 OATA253.200.200. 192, 232, 144,239 

:-: : - 94.133.253,173.1, 194 

!=■- ::- r 59 33 251. 16S 4 

itC z^-ii:i: 241, 194,173,0,194 

. -. . . -12 253 173.:, 194 
29C l^TA:3S 3 19^.133.254,169,39,133 

:- A25i 159.216 133.252. 32,241 ,194 

30C CAT* -=z.£ 1^*3 22 208.41.248,141.22 
3*: 3»T\2C6 13£2i.^Q9.22mi41 r 22 
32C UATA208 172 5/94 136 206 253.202 
IHZ - -1 3 194 24 105.1,141 

3*0 OATAO, 194,173.1. 19*1 05 Q MT 1 
350 MTA194,1W.168 J 1«.17D 136 2^0 3 
380 DATA76.19.T94, 173.0. 194,24,105,192 
3713 DATA141 0,194,173,1,194,105.3,141 

1 390 DATA162,25,1 60 ,0.1 77, £53, 145,251 
400 DATA202. 240 .29,1 65.251 ,24, 105,40 
410 DATA133.251 .165,252,105,0,133,252 
420 DATA165, 253, 24, 105, 40.133, 253, 105 
430 DATA254 , 1 05 , 0 , 1 33 , 254,76 ,245,1 94 
440 DATA96 

450 DATA40227:R EM 1 SJMA CONTROL * 

Rutina para establecer 
la visualizacibn 

1000 REM * * * * ESTABLECE VISUALIZATION 

1010 CL=3000:REM DESPLAZ AL MAPA COLOR 

1020 SS-8192:REM INICIO MAPA VISUAUZ. 

1030 FORI=SST0 $$+479 

1040 POKE L1:REM CODIGO PANT. OE LA "A" 

1050 P0KE+CL,1:REM BLANCO 

1060 PbK£l+4M,2:REM CODIGO PANT. DELA 'B 1 ' 

1070 P0 KEI + CL ^480 , 1 4:REM AZUL CLAfl 0 

1OS0 NEXT 

1065 FORI =S$-t-960TOSS + 999 

1090 POKEI,3:REM CODIGO PA«T. DE LA "C 

1100 P0KEI+CL.3 REM AZUL MARINO 

1110 NEXT 

1999 ' 

2020 SS=9192;REM SIGUIENTE INICIO PANT, 

2030 FORI =SS TOSS +479 

2040 P0KEI,3:REM CODIGO PANT, DE LA 1, C" 

2050 P0KEI+CL5:REM VERDE 

2060 P0KEI+4&D,4:REM CODIGO PANT. 0E LA "D" 

2070 POKEI^CL- 480, 0: REM NEGRO 

2060 NEXT 

2065 FORI =SS+960T0SS+ 999 

2090 P0KEI.5:REM CODIGO PANT. DE LA "E" 

2100 POKE!+CL,2;REM ROJ0 

2110 NEXT 
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Desplazamientos visuaies/Lenguaje maquina 



Movimiento horizontal 



++++++++++++++++ 

++++++++++++++++ 
++ ++ 

+ + MOV. HORIZONTAL ++ 

++ 

+ + PARA COMMODORE 64 ++ 

++ ++ 
++++++++++++++++ 
++++++++++++++++ 

SGRPTR-SFB 
COLPTR=SFD 



I NY 

CPV # EXTRA 

BCC ANTHER ;Sl Y<EXTRA REPETIR 

i+ +++ ENSERTA COLUMNA DER DE PANT + ++ + 



MEMPTR=$F0 

SCRLRG =5001 6 

SCRNLO=S00 

SCRNHI=$04 

C0LRLO=$00 

COLRHI=SD8 

BL0CKS=IO3 

EXTRA.=SE8 

NMC0LS-S28 

NMR0WS=$19 



*=SC2O0 

MEMLO ' 

MEMHJ ■ 

COFFLO ' 

COFFHI ■ 
NMSC3N 
DELAY 



-'+1 
-*+1 
=*+1 

**+1 
-*+1 
=*+1 



PAGINAO 
:PUNTER0S COPlA 

PUNTPCERO DE MEMORIA 
REGISTRO DESPLAZ HORIZ 
BYTE LODE INICIO PANT 
BYTE HI DEINICIO PANT 
BYTE LO DE INICIO COLOR 
BYTE HI DE INICIO COLOR 
BLOOUES DE BYTES 3*256 
BYTES EXTRA HASTA1000 
NUMDE COLUMN AS 
NUM DE FILAS 



JNICIO MEMORIA OUE 
:SE HA DE DESPLAZAR 
; DESPLAZ AL MAPA DECOLOR 

;NUM PANTALLAS 

; VALOR BUGLE DEL RETARD 0 



LDA MEMLO 
STA MEMPTR 
LDA MEMHI 
STA MEMPTR+1 
LDA #NMCOLS-1 
STA SCRPTR 
LDA #SCRNHI 
STA SCRPTR+1 
JSR C0PY4O 
-+++INSERTA COLUMNA DER 
LDA MEMLO 
CLC 

ADC COFFLO 
STA MEMPTR 
LOA MEMHI 
ADC COFFHI 
STA MEMPTR- 1 
LDA #NMCOLS-1 
STA SCRPTR 
LDA #C0LRHI 
STA SCRPTR+1 
JSR COPY40 



ESTABLECE PAGINAO 
PUNTEROS A LA MEMORIA 



;E STAB LEGE PAGINAO 

iPUNTEROS a la pantalla 



;COPIA COLUMNA 
DECOLOR +++ + 



;SUMADESPLAZ AL 
;MAPA COLOR 
;ESTABLECIENDO LOS 
iPUNTEROS PAGINAO 

;ESTABLECE PUNTEROS 
;PAGINAQAL COLOR 
RAM 

;REALIZA LA COPIA 



MORE 1 



++++ ESTABLECE MOD0 3SCOLUMNAS --++ 

LDA SCRLRG 
AND #$f7 
STA SCRLRG 

+ + + + ESTABLECE PRIM ERA POSITION A DESPLAZ ++++ 
LDX NMSCRN 



h POSICIONES DEL 6 AL 0 PARA DESPLAZ + + ++ 

ldx #ioe 

LDA SCRLRG 
AND #SF8 
STA SCRLRG 
TXA 

CLC 

ADC SCRLRG 
STA SCRLRG 



NEXSCR 
START 



MORE2 



iCOLOCA LOSREGX.Y 
;ENLAPILA[PUSH) 



LDY #NMCOLS 

TXA 
PHA 
TYA 
PHA 

LDA SCRLRG 
AND #SF8 
CLC 

ADC #107 
STA SCRLRG 



++++ COPIA PANT/COLOR UN LUGAR IZQ +++ + 



LDY DELAY 

DEY 

BNE MORE2 
DO 



iCUENTAATRAS 
■VALOR RETARDO 



ESTABLECE PAGINAO 
.PUNTEROS PARA LA 
COPIA 



AGAIN 



LDA #SCRNLO 
STA SCRPTR 
LDA #SCRNHI 
STA SCRPTR+1 
LDA #COLRLO 
STA COLPTR 
LDA #C0LRHI 
STA COLPTR +1 

LDX #BLOCKS 

LDY #$01 

LOA (SCRPTR). Y 
DEY 

r- s:™= 

NY 

LDA [COLPTR] .Y 
DEY 

STA (COLPTR)T 

INY 

IHY 



; + + TRASCfilSE BORDES PA6INA -r + 

JNC SCRPTR^I ;INCR BYTES HI DE 
INC COLPTR+1 ;PUNTERGS PAGINA 0 
LDA (SCRPTR) P Y 
DEC SCRPTR+1 
DEY 

STA [SCRPTR), Y JRASCRlBE PAGINA 
INY 

LDA (COLPTR) ,Y 
DEC COLPTR+1 
DEY 

STA (COLPTRXY 
INC SCRPTR+1 
INC COLPTR+1 
DEX 

BNE AGAIN 

■—PRODUCE BYTES EXTRA - 
LDY#S01 

ANTHER 

LDA (SCRPTR).Y 
DEY 

STA (SCRPTR).Y 
INY 

LDA (COLPTR), Y 
DEY 

STA [COLPTR) „Y 
INY 



+++^ INCRaiBITAPUIfT. MEWORtA +++ + 

LDA MEMLO 
CLC 

AOC #501 
STA MEMLO 
LDA MEMHI 
ADC #$00 
STA MEMHI 

; + ++ + COMPRUEBA FIN AREA MEMORIA +++ + 



NO J MP 



■3 ET R K 



PLA 
TAY 
PLA 
TAX 
DEY 

BEG NOJMP 
JMP START 

LDA MEMLO 

CLC 

ADC #SC0 
STA MEMLO 
LOA MEMHI 
ADC #103 
STA MEMHI 
DEX 

BEQ RETRN 
JMP NEXSCR 

RTS 



:RECUPERA LOS REG X,Y 
■DE LA PILA 



-SUM A 1000-40 

;AL PUNTERO MEMORIA 



£ q DE COPIA A CADA 40 BYTES ++++ 

REPEAT 



JNCR PUNTEROS PO 
;UNAVEZMAS 



LDX 

LDY #300 

LDA (MEMPTR),Y 
STA [SCRPTR), Y 
DEX 

BEQ FINISH 

LDA SCRPTR 

CLC 

ADC #NMCOLS 
STA SCRPTR 
LDA SCRPTR+1 
ADC #SO0 
STA SCRPTR+1 

LDA MEMPTR 
CLC 

ADC # MM COLS 
STA MEPTR 
LDA MEMPTR+1 
AOC #SO0 
STA MEMPTR+1 
JMP REPEAT 

RTS 



;AG0TADAS TO DAS LAS FI LAS? 



JNCR EN 40 LOS PUNTS 



Software/Libros de informatics 



SEYMOUR PAFERT 

MIND- 
STORMS 

Children, 

Computers, 

and 

Bowerful Ideas 



"Mindstorms" (Ideas 
geniaJes}, de Seymour Papert, 
Harvester Press, 1980 



Iniciamos esta recension comentando dos reveladoras obras que 
examinan las interioridades de la informatica: "Mindstorms" (Ideas 
geniales), de Seymour Papert, y "The soul of a new machine" (El 
alma de una nueva maquina), de Tracy Kidder 



the secarr world of ft 

Tiff SOUL 
OF A NEW 




"Mindstorms" 

"The gears of my childhood" (Los engranajes de mi 
infaocia) se titula el prdtogo de Mindstorms; en el 
Seymour Papert explica su libro, sus ideas y su per- 
sona, En so vehemente monologo nos habla de la 
fascination que, cuando nino, ejercieron en el los 

"Un nuevo mundo de informatica 
personal esta a pnnto de 
aparecer. inseparable de la 
historia de quienes lo realizaran." 

Irenes dc engranajes y como, a traves de el los, des- 
eubrid el placer de aprender; ahora continua ena- 
morado de la moderna encamacion de estos: el or- 
deoador personal en el euarto de juegos. 

El estilo de Papert y su propia personalidad son 
dominantes, pero el libro se halla imbuido de la 
personalidad y las ideas de Jean Piaget (18964980), 
el psicologo-pedagogo que mas influencia ha ejerci- 
do en los tiempos modernos. El logo, el lenguaje 
para ordenadores dcsarrollado y descrito a lo largo 
del libro, es en realidad el hommage au mattre de 
Papert, un intento por formular una expresion con- 

"Empleo la imagen de Mathland 
para desarrollar mi idea de que 

la presencia del ordenador 
podria conllevar la union de las 
culturas humanista y 
matematico-cientffica/* 

creta de las ideas de Piaget acerca del nino como 
"constructor activo de sus prop i as estructuras inte- 
lectuales". 

En este sentido, el libro no versa en realidad ni 
sobre logo ni sobre Piaget, ni siquiera sobre el pro- 
pio Papert; su verdadero tern a es como los ordena- 
dores pueden crear cspacios de aprendizaje ('*mi- 
cromundos") en los cuales el nino pueda aprender 
a pensar y razonar con la misma alegria y la misma 
riqueza con que lo hizo Papert con sus engranajes 
aleg6ricos< 

Al igual que en el caso de Piaget y su obra escri- 
ta, Papert y el logo nan sido alabados por sus difu- 
sores y luego criticados por los revision is tas en d 
espacio de apenas unos pocos anos. Las ideas de 
Piaget acerca de los distintos estadios del desarroJlo 
del nino han sido cuestionadas por su aparente de- 
tcrrmnismo; mientras que en la actualidad hay 
quienes piensan que el logo es util solo para ense- 
nar geometria y programaclon, en vcz de conside- 
rarlo como la u piedra filosofaT. 

EI titulo, Mindstorms (Ideas gen i ales), describe y 
define el libro. Sin duda alguna, Seymour Papert 
escribe tal como piensa: en una mezcla maravillosa- 
mente estimulante de frio analisis academico y ar- 
d a rose] tono profesoral. 



"The soul of a new machine" 

Tracy Kidder nos cuenta la historia secreta del de- 
sarrollo del miniordenador Eagle, de Data Gene- 
ral, empresa llevada a cabo a partir de cero en el 
transcurso de apenas un ano. El libro obtuvo el 
premio Pulitzer de 1982 para obras ajenas al genera 
de ficci6n y ha servido de base a una pelicula, 
Posee misteriosas insinuaciones psicologicas para 
los seguidores de Piaget, desde los rostros con cier- 
to aire de robot de los jovenes cientificos de la cu- 
bierta del libro, pasando por los ecos edipicos de 
los esfuerzos de la joven empresa de ordenadores 
por superar a su gigantesca casa madre, DEC, 
hasta la figura de caracteres novelescos de West, el 
ingeniero de proyectos y jefe del equipo, Se la po- 
dria definir como la version informatica de Moby 
Dick, la novela de Melville, una historia que cauti- 

"Monotonamente, el ordenador.. . 
estaba contando una antigua 
historia: el materialista cuento 
de hadas hecho realidad." 

va al lector, narrada con sencillez. 

El libro es tecnicamente esplendido, con descrip- 
tions graficas de cad a una de las etapas del disefio 
y la construction del miniordenador de 32 bits, Kid- 
der pu do observar direct amente gran parte e el de- 
sarrollo del proyecto y relata, en una prosa austera 
y cristalina. las explicaciones para fas decisiones 
adoptadas y las acciones emprendidas. 

El libro versa fundamentalmente sobre la exis- 
tencia brill ante y algo aisJada de los tecmcos cuyo 
microcosm os esta compuesto por los sistemas ope- 
rativos que ellos mismos inventan. Kidder se siente 
igualmente fascinado por sus re acciones personal es 
ante el desarrollo de la maquina, por la enmarafia- 
da atmdsfera que envuelve af grupo, en que se mez- 
clan lealtad, presiones, manipulacidn, y por la bi- 
zantina pohtica de la empresa, que determina la 

"Ahora el juego era diferente... 
La maquina ya no pertenerf a a 
quienes la habian creado." 



planificacion y el diseno de la maquina. El para- 
rrayos de tod a esta energia es Tom West, a quien 
en el pro logo dc la obra se describe literal mente 
como ts un buen h ombre en medio de una tormen- 
ta". Su equipo exclusivo dc jdvenes ingenieros tra- 
baja toda la noche, inspirado en parte por su ejem- 
plo, a pesar de lo cual el cinic amente les niega una 
maquina de prueba esencial por que "no pagar las 
horas extras sale mas barato que el nuevo equipo". 
West bien puede ser el capitan Achab o el capitan 
America... Tracy Kidder no parece tener muy cla- 
ras las ideas en este sentido. Pero su libro arroja luz 
sobre algunos de estos h ombres. 



Comunicaciones/Aplicaciones 



Guia del comprador 



cCuales son las preguntas que 
el usuario debena formular para 
adquirir el equipo mas 
adecuado? Aquf se las 
sugerimos 



Cuando usted eligio su ordenador, quiza fue acon- 
sejado en el sentido de que decidiera primero el 
software que deseaba utilizar y optase luego por el 
hardware necesario para ejecutario. Hasta cierto 
punto, este es un buen consejo cuando se trata de 
elegir un sistema para comunicaciones. Sin embar- 
go, creemos que a menudo es muchisimo mejor ad- 
quirir el modem y el software como paquete global 
en el mismo comercio, 

Lo primero que debe hacer es decidir para que 
utilizara el sistema. Para acceder a sistemas de vi- 
deotexto tales como el Prestel necesitara un 
modem de 1200/75 baudios; para la mayoria de los 
sistemas de tablones de anuncios y correo electronic 
co preeisara un modem de 300 baudios, y para el 
trabajo directo usuario-usuario se recomienda una 
velocidad de 1200 baudios. Para acceder a Compu- 
net se requiere un modem Compunet especial, 
puesto que el software esta almacenado en la ROM 
del modem. Usted tendra, asimismo, que tener en 
cuenta las frecuencias utilizadas. En Gran Bretana 
y Espana, por ejemplo, necesitar& frecuencias 
CCITT; en Estados Unidos se emplean tonos Bell. 
Por consiguiente, si desea realizar llamadas trans- 
oceanicas directas, es preeiso que su modem pose a 
ambas frecuencias. 

Para las comunicaciones usuario-usuario es su- 
mamente aconsejable tener un modem que pueda 
conmutar entre frecuencias de emision y de recep- 
ci6n. Si este opera solo en la de emision, el modem 
al cual llame debera ser eapaz de conmutarse a la 
de respuesta. 

Si pretende llamar a tablones de anuncios, resul- 
ta esencial un modem con la facilidad de llamada 
automdtica (no disponible en Espana). ELlo se debe 
a que la mayoria de los tablones de anuncios po- 
seen unicamente una linea teiefonica y solo permi- 
ten el acceso a un usuario a la vez, Por este motivo 
con frecuencia est an comunicando, de modo que es 
logico dejar que el modem realice la llamada repe- 
tidamente por usted. Un modem con llamada auto- 
mat! ca tambien debe soportar software capaz de 
obtener un numero (ya sea desde el teclado o bien 
desde una base de datos de numeros de teleTono) y 
enviarlo al modem en el formato correeto. Lameo- 
tabiemente, los diferentes modems con llamada au- 
tomatica esperan que el numero que se les en vie 
este en formatos diferentes, de modo que es nece- 
sario que el modem y el software sean compatibles: 
un buen argumento para adquirir tanto el modem 
como el software en un solo paquete, 





SOFTWARE SUPPORT MENU 



1 Select terminal emulation 
Z Remote operations 
Z ASCII transmit/ receive 

4 Binary transmit /receive 

5 Auto-log file mode 

6 Database auto-dial 
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Si desea que la gente le envfe datos dircctamen- 
te, hallara muy justificada la inversion que supone 
la adquisicion de un modem con contestador auto- 
mdtica. No obstante, si piensa utilizar para este fin 
su linea telefbnica normal, debera tener la cortesia 
de advertirselo a sus amigos, en especial a aquellos 
que no posean un modem. De lo contrario, \s\x 
modem podria silbarles durante diez segundos y 
despues colgar! 

El software adecuado tambien es esencial para 
un modem con contestador automatico* Esta clase 
de software comprende desde paquetes capaces de 
abrir un nuevo archivo para cada llamada y guar- 
darlo en disco, hasta software sofisticado para ta- 
blones de anuncios tales como el TBBS. Un intere- 
sante ejemplo de software con contestador automa- 
tico para micros CP/M es el Remote CP/M, Este 
paquete permite que usted "disque" su micro CP/M 
y ejecute cualquier program a CP/M a traves del te- 
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Aplicaciones/Comunicaciones 




PfOtek120O 
Tipo: Modem acustico 
VelocidadM 200/75 y 
1200/1200 baudios 




Prism 1 0DD 

Tipo: Modem compacto para| 
videotexto 
Vslocidad: 1200/75 baudios I 




Commodore 

Communications Modem 
Tipo: Modem compacto de 
videotexto para Compunet 
Velocidad: 1200/75 y 
1200/1200 baudios 




Epson CX-21 

Tipo: Modem acustico 

Velocidad: 300 baudios 



lefono, lo que resulta ideal para aquellos usuarios 
que posean un micro de sobremesa o uno portatil. 
Al elegtr el software apropiado, es casi seguro 

que desee un paquete que sea capaz de reel bir y 

emitir archives ASCII. Asegurese de que el paque- 
te soporte cualquier dispositivo de almacenamiento 
que usted utitice. Los programas en basic se pue- 
den transmitir en forma ASCII, como ya sabemos; 
pero si desea transmitir archivos binarios (p. ej. ? 
archivos .COM CP/M), necesitara alguna clase de 
protocolo para transmision binaria. De estos, el 
mas difundido es el XModem. 

Tambien cs conveniente poder crear archivos de 
conexion automdtica para distintos sistemas. Enton- 
ces, cuando conecte con un sistema, todo cuando 
debera hacer es cargar el archivo apropiado, conte- 
niendo so identiftcador, contrasena, etc. Algunos 
sistemas con llamada automatica enlazaran este 
tipo de archivos con una base de datos de numeros 
de telefono, de modo que lo unico que ha de hacer 
es entrar el nombre del servicio que desea; el soft- 
ware buscara el numero de telefono, lo marcara y 
se conectara automatkamente. 

Una vez decidido respecto a las caracteristicas 
que requiere, ha de encontrar un paquete de 
modem y software que soporte estas facilidades. 
Puede adquirir el modem y el software por separa- 
do, pero le aconsejamos decididamente que le pro- 
porcione al vendedor una lista de las caracteristicas 
que desea, asi como detalles sobre el micro que uti- 
tizara, y deje que el le busque un paquete completo 
compuesto por modem, cable y software. De esta 
forma, si el sistema no cumple con lo que deseaba 
que hiciera, tanto usted como el comerciante sa- 
bran qui en debe arreglar la situacion. 

Eleccion de un terminal 
idoneo 

Si ya posee un micro, es probable que desee usario 
como terminal, EDo sera tacdble independiente- 
mente de la maquina que posea (si esta muy decid- 
do. incluso se puede utilizar un ZX81). si bien algu- 
nos micros se prestan mejor que otros para las co- 
municaciones, He aqui un breve resumen de la ido- 
neidad de los cuatro micros mas populares. 

Con mucho, la maquina mas facil de convertir en 
terminal es el BBC Micro. De hecho, usted puede 
escribir un simple programa de terminal mudo para 
el mismo con unas pocas tineas de basic: 

100 REM Programa de terminal mudo para el BBC 
110 *FX2,2 
120 *FX3,1 

130 REPEAT: GET AS: IFA$=CHR$(13) THEN PRINT 
140 PRINT A$;:UNTIL FALSE 

Para el BBC Micro existen varios buenos paqueles 
de comunicaciones, algunos de los cuales se sumi- 
nistran en ROM, pero suelen ser car OS, La mayoria 
ofrecen todas las caracteristicas requeridas por el 
usuario medio, porque la mayor parte del trabajo 
lo realiza el sistema operative del ordenador: todo 
lo que ha de hacer el programador es anadti los 
toques finales. 

El Spectrum es mas dificif de adaptar. En primer 
lugar, no podra batir ningun record de velocidad en 
materia de comunicaciones desde basic. Con un 
programa en este lenguaje apenas es posible em- 



pujar el Spectrum hasta unos 10 baudios y entonces 
no sera capaz de llevar a cabo tareas tales como 
almacenar los caraeteres en RAM. Tambien puede 
olvidarse de su Interface 1: no es una interface 
RS232 y sirve de poco para comunicaciones. Para 
el Spectrum tod a via no existe virtual mente softwa- 
re para comunicaciones. 

El Commodore 64 tambien posee una interface 
en 4 serie no estandar y la mayoria de los modems 
para la maquina se enchufan en la puerta para el 
usuario. Nuevamente, tampoco podra hacer nada 
muy util en basic. Asimismo, el 64 posee un juego 
de caraeteres ASCII no estandar, de modo que el 
software para comunicaciones ha de traducir entre 
ASCII estandar y ASCII Commodore, algo que se 
puede hacer muy facilmente empleando una tabla 
de referenda. No existen paquetes de software de 
comunicaciones aprobados por Commodore. Los 
usuarios britanicos tienen la posibilidad de obtener 
el Termulator de Chris Townsend Computers; los 
norteamericanos habran de consultario con las tien- 
das locates, Los usuarios de Compunet pueden uti- 
lizar el modem Compunet Commodore oficial con 
software residente, pero este modem es exclusive 
para Compunet. 

Tandy suministra software de terminal mudo 
para sus maquinas TRS-80 basadas en disco que 
operan bajo la mayoria de los sistemas operativos. 
La mayor parte de este software esta destinado a la 
transferencia directa maquina-maquina, pero tam- 
bien se puede emplear con modems. Las maquinas 
Tandy fueron \o% primeros micros que se utilizaron 
para ejecutar y acceder a tablones de anuncios, de 
modo que normalmente se puede hallar una buena 
seleccton de software para comunicaciones de do- 
minio publico, basado tanto en disco como en cas- 
sette. Las TRS-80 no son aptas para operation de 
videotexto (120075 baudios). 

En realidad cualquier micro de gestion se puede 
utQizar para comunicaciones, pero existen varios 
puntos importantes a tener en cuenta. En primer 
higar, existe una creciente tendencia hacia los mo- 
dems incorporados; estos (en particular aquellos 
con software de comunicaciones basado en ROM) 
son los mas faeiles de emplear. Tan solo es necesa- 
rio enchufarlos en el conector del telefono. 

Si se desestima la option del modem incorpora- 
do, la siguiente mejor opcion es un micro con al 
menos dos puertas RS232, que permitira el uso si- 
multaneo de un modem y una impresora en serie. 
Algunos micros poseen puertas para modem sepa- 
radas y no estan dares: estas serviran siempre y 
cuando usted pueda conseguir un cable adecuado 
para el modem que elija. 

Desde el punto de vista del software, no tendra 
ningun problema con maquinas CP/M, MS-DOS o 
PC-DOS. Los sistemas operativos no estandariza- 
dos, sin embargo, corren tanto riesgo desde el 
punto de vista de los paquetes para comunicaciones 
como con cualquier otro tipo de software. 

Si las comunicaciones son su principal razon para 
adquirir un micro, las llamadas maquinas "de rega- 
zo n , tales como el Tandy Modelo ltX), el NEC 
PC8201A y el Olivetti M10 son muy interesantes. 
Con una de eilas y un modem que funcione con 
pilas tendra un terminal de maletm conveniente- 
mente portatil Las tres maquinas poseen editores 
de texto incorporados y software de terminal y per- 
miten unas 20 horas de uso con cuatro pilas A A. 
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Aplicaciones para robot/Brie© 




Tomar medidas 



Disenaremos un f ragmento de software para que el robot pueda 
ubicar y medir con exactitud el lado de un objeto 



Conseguir que nuestro robot localice y mida el lado 
de un objeto exige un software algo complejo. El 
robot investigate el objeto empleando ios sensores 
de microinterruptor que ya le nemos instaiado. Las 
primeras ideas que tuvimos para un posible metodo 
de realizar esta tarea fueron: 

1) Hallar el objeto. 

2) Encoutrar un extremo del lado localizado* 

3) Ir probando a lo largo del lado del objeto hasta 
hallar el otro extremo. 

La primera etapa se puede cubrir facilmente si su- 
ponemos que cuando comienza el programa el 
robot esta orientado hacia el lado del objeto que 
deseamos medir. El principal problema que se 
puede prever es que el robot alcance uno de los 
extremes del lado con un solo sensOT en vez de 
hacer contacto con am bos. En el diagrama se re- 
flejan las posibles variaciones. No obstante, aun 
cuaodo uno de los sensores delanteros estuviera ce- 
rrado, se puede saber si se trata del izquiedo o del 
derecho y, por consiguiente, podemos desarrollar 
una estrategia para tratar esta situation. 

Debemos, asimismo, dar por sent ado que initial- 
mente e! robot esta position ado en 90° respecto al 
lado del objeto a medir. Con ello nos ahorramos el 
tratar casos en los cuales el robot efecttie un contac- 
to oblicuo con el objeto. 



La segunda etapa de nuestro metodo se simplifi- 
ca decidiendo que el robot siempre avance hacia el 
extremo derecho del objeto antes de comenzar a 
niedirlo. Para localizar el extremo derecho, ei 
robot debe "sentir" su recorrido a lo largo del lado, 
desplazandose en pasos discretos hacia la derecha 
hasta que solo se cierra el sensor izquierdo (y no 
ambos). Para ir sondeando el lado, el robot ha de 
llevar a cabo una serie com plica da de maniobras, 
imolirniidu cada paso cinco movimientos. Supo- 
niendo que inicialmente el robot este en contacto 
con el lado del objeto, debe primero retroceder. 
luego girar 90°, avanzar una tierta distanria. volver 
a girar 90° y por ultimo avanzar hasta que Ios senso- 
res vuelvan a hacer contacto con el objeto. El diar 
grama ilustra los pasos que supone la manjohra 
completa. La longhud de past ifeAautia cHbc m 
punto de contacto con el lado del objeto yda- 
guiente punto) es equh aleote a la parte de la ma- 
niobra en la cual el robot se despfaza paraletameate 
al lado del objeto. 

Para localizar coo precision el extremo derecho 
del objeto. podria parecer necesario que el robot 
son dear a e! lado en pasos de unos pocos milime- 
tros, pero no es asf. Por el contrario. podemos utili- 
zar pasos may ores, sondeando el lado del objeto 
hasta sobrepasar el extremo, y luego retroceder un 
paso para sondear en pasos menores para localizar 



Sensaciones... 



Este diagrama ilustra las tres 
alternativas que se pueden 
product cuando los sensores 
entran en contacto con el lado 
de un objeto. Cuando solo esta 
cerrado el sensor de la derecha, 
el robot ha detectado el extremo 
izquierdo del objeto; si ambos 
estan cerrados, "sabe" que se 
rtalia en aJgun punto del medio: 

i l'. '. z'-'i '.z"'zZZ z iz'll' Zz. 
z ZZ. z 11 : : " : IZzll ZZ" \ 

extreme derecho del lado 




Cerrado s6lo el Cerrados Cerrado solo el 

sensor derecho ambos sensores sensor izquierdo 
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Bricolaje/Aplicaciones para robot 



con exijtimc ei extremo derecho, Una longitud de 
paso adeoiada es la distancia entre los dos sensores 
delanteros ( alrededor de 60 mm), puesto que ello 
asegura que cuando se sobrepase un extremo, uno 
de los sensores se cierre, 

La tercera etapa supone un procedimiento de 
sondeo similar, pero en esta ocasion el robot se des- 
plaza had a la izquierda, con tan do la cantidad de 
pasos dados hasta llegar al extremo izquierdo. Al 
final de esta etapa, la longitud del lado del objeto 
estara almacenada en la variable del contador y 
podra ser impresa. 

Programa de medicidn 

Ofrecemos listados para ei Commodore 64 y el 
BBC Micro. Se deben insertar los coeficientes im- 
pulso/distancia e impulso/angulo para su propio 
robot (hallados mediante la experimentaeion en el 
capftulo anterior del proyecto del robot). La estruc- 
tura de procedimientos del basic BBC es ideal para 
escribir un programa de esfe tipo. Po demos adop- 
tar un enfoque sumamente estructurado para este 
problema, controlando, mediante procedimientos 
se parados, cada movimiento que efectue el robot. 
Dos caracteristicas del basic BBC (los nombres de 
variables ampliados y el paso de parametros entre 
procedimientos) hacen que el programa se asemeje 
mucho a la forma en que nosotros pensamos* La 
version Commodore puede adoptar el mismo enfo- 
que estructurado, pero su e struct u radon en basic 
resulta mucho mas dificultosa, lo que hace que el 
programa sea mucho mas dificil de seguir que la 
version para el BBC. 

Habiendo aislado las principales tareas que debe 
llevar a cabo el programa, podemos disenar proce- 
dimientos individuales para desplazar el robot v 
com bin ar una serie de maniobras para crear un me- 
to do de sondeo. La combinacion de los procedi- 
mientos de sondeo forma el procedimiento de me- 
dicidn global. En esta aplicacion. los dtstintos nive- 
les de procedimientos se pueden identrfkar facfl- 
mente, yendo desde un sendilo metodo para un- 
pulsar los motores, en el ruvel mferior- hasta laacti- 
vidad de medicion completa en el nrvel mas ele- 
vado . 

Si inicialmente no se coloca e! robot exactamente 
en 90° respecto al lado del objeto a medin pueden 
surgir problem as. Si solo uno de los sensores hace 
contacto cuando am bos deberian hacerlo, entonces 
la logica del programa hara que el robot decida que 
esta posicionado en uno de los extremos del objeto. 
Si esto sucede. interrumpa el programa, alinee al 
robot perpendicularmente al lado a medir, y vuelva 
a ej ecu tar el programa desde el principio. 

Se pueden id en t if i car varios errores intrinsecos 
dc medicion. La anchura de cada sensor, por ejem- 
plo, es de unos 5 mm. La localizadon de los extre- 
mos izquierdo y derecho del objeto puede, por 
consiguiente. producir un error maximo total de 
10 mm. 

Ademas, cuando el robot sondea con precision 
los extremos del objeto, lo hace en pasos de 5 mm 
y, por lo tanto, se puede introducir atin otro error 
de 10 mm. 

En las pruebas con nuestro robot prototipo, el 
promedio de error para la medicion de un objeto 
de 410 mm de lado fue de unos 20 mm: un margen 
de solo el 5 % . 



Espacio pafamanioiwar 




de D3S0 (3). EJ robot r&aJiza 
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principio los pasos del robot 
son largos, para obtener una 
longitud aproximada deJ 
objeto, Cuando solo uno de 
ios sensores, o ninguno, esta 
cerrada el robot desanda el 
iiltinw paso y repite 
en su totaiidad 

el procedimiento de sondeo con 
pasos mas cortos 



Procedimiento de sondeo 




Comfenzo 



Se pasa de largo, de modo 
que retrocede un paso largo 



Se rep te e procedimiento con 
pasos mas cortos para 
localizar con exactitud el 
extremo del lado 



Sondeo en pasos largos 
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Listado para BBC Micro 

1000 REM ** ** MEDICION ROBOT BBC **** 

1010 MODE? 

1020 PROCinicfaJizar 

1030 PROCrnedir 

1040 PROC imp rim ir 

1050 END 

1060 DEFPROGmedir 
1070 PROChallaf 

1080 REM ** SOLO UN PARACHOQUES ? " 

1 090 PROCcomprobar_parachoques 

1100 REM " ^ HALLAR EXTREMO 

1110 REPEAT: PR 0 Cson d ear(d erecha, ancftura) 

1120 UNTIL (?REGDATAND 1 92) = parachoques_Jzquierdo 

1130 REM ** RETROCEDER Y AVANZAR HASTA EL EXTREMO M 

1140 PROCscndear(izqiiierda a anchura) 

1 1 50 REPEAT:PROCsondear(derecha,artchiira_peqijena) 

1 1 60 UNTIL (?REGDAT AND 1 92) = paracho q u es_izq u ierdo 

1170 PRINT " HALLADO EXTREMO DERECHO" 

1180 PRINT'COMIENZA LAMEDICION" 

1190 REM ** EMPEZAR AMEDIR ** 

1200 contador= anchura 

1 21 0 REPEAT: PROCsondear{izquierda,ancriura) 

1 220 contador=contador+ancriuira 

1230 UNTIL (?R EG DAT AND- 192)=parachoques_derecho 

1240 REM > ' RETROCEDER Y AVANZAR HAST A EL EXTREMO ** 

1250 cg ntad or = co ntad or - an chu ra 

1260 PRO Cso ride ar( de recfia , anchu ra) 

1 270 REPEAT:PROCsondear{tiquierda.anchura_pequena) 

1 280 conlad or = co ntad or + an chu ra_pequena 

1290 UNTIL (7REGDAT AND 192)=parachoques_derechc 

1300 2REGDAT-0 

1310 ENDPROC 

1320 : 

1330 DEF PROCimprimir 
1340 GLS 

1350 PRINTTAB(5,12) J EL LADO DEL OBJETO 

MIDE "icontador;" mm" 
1360 ENDPROC 
1370 : 

1380 DEF PROCinicializar 

1391 RDD=&FE62:REGDAT=&FE60 

1400 ?RDD=15:REM LINEAS 0-3 SALIDA 

1410 ?REGDAT=1:REM ENGENDER BIT PUESTA A CERO 

1 420 ade1ante=4:airas-2:izquierda=6;derecha=0 

1 430 coel i ciente id = 3 .3444 6: co eficiente ia = 375/90 

1 440 parachoques_derecho= 1 28:parachoques_izqmerdo =64 

1 450 arrrbos parachoques=0:ningun parachoques= 1 92 

1460 anchura=60:anchura pequefia=5 

1470 ENDPROC 
1460 : 

1490 DEF PROCbuscar(sentido) 

1 500 REPEAT: PR 0 Cso n dear(senti do , an c h u ra) 

1510 UNTIL (?REGDAT AND 192)=ambos_parachoques 

1520 ENDPROC 

1530 : 

1540 DEF PROCballar 

1550 REPEAT: PROCmoverfadelanteJ) 

1560 UNTIL (?R EG DAT AND 192)<>ningun_parachoques 

1570 ENDPROC 

1580 : 

1590 DEF PROCcomprobar__parachoques 

1600 IF (?REGDAT AND 1 92)= parachoques_derecho THEN 

PROCbu sea r(ds rec h a) :E NDP RO C 
1610 IF {? REG DAT AND 192)=paracboqEje^-rzquiBrdo™BI 

PROCb u sea r(izq uierd a);END PROC 
1620 ENDPROC 
1630 i 

1640 DEF PAOCsondearfciirBcbon.paso; 
1650 JF(fcsa»i=itef^THEHtin^^ 

: :~ z = zt*t: i 

1660 PROCmovejfatras.30) 
1670 PROCgirar(direcdon,90) 
1680 PROGmover(adalante P paso) 

1690 PRO Cg ira r(di reccion op , 90) 

1 700 R EPE AT; PROC m o ver(ade I ante . 8) 

1710 UNTIL (7REGDATAND 1 92)<>mnguri_parachoQ.ues 

1720 ENDPROC 

1730 : 

1 740 DEF PRO Cmover(di r, d istan cia) 
1750 ?REGDAT=(?REGDAT AND 1)OR dtr 

1 760 im pulsos = coeficiente id * d istancia 

1770 FOR N1 TO impulsos:PROCimpulso:NEXT I 
1780 ENDPROC 
1790 : 

1800 DEFPROCgirar(dir,angufo) 

1810 ? RE G DAT - ( ?R EG DAT AND 1)ORdir 

1 820 i m pulsos = coefici ente_ia *angu lo 

1830 FOR 1=1 TO impulses: PROCimpulso:NEXT I 

1840 ENDPROC 

1850 DEF PRQCimpulso 

1860 ?REGDAT(?RE6DAT OR 8) 

1 870 ?REGDAT= (?REGDAT AND 247) 

1880 ENDPROC 



Listado para Commodore 64 

10 REM *** * MEDICION ROBOT CBM **** 

20 GOSUB1000:REM INICIALIZAR 

30 GOSUB2000:REM MEDIR 

40 GQSUB3000:REM JMPRIMIR 

50 END 

60 : 

1000 REM **** INICIALIZAR **** 

1010 RD D = 565 79: REGO AT = 5 6577 

1020 POKE RDD,15:REM LINEAS 0-3 SALIDA 

1030 POKE REGDAT,1:REM ENGENDER BIT PUESTA A CERO 

1040 FW=4: BW=2: LF=6: RT-0 

1050 PD=3,34446:PA=375/90 

1060 RB=i28:LB=64:BB04O:NB-192 

1070 WD=80:SW=S 

1080 RETURN 

1090 : 

2000 REM **** MEDIR **** 

2010 GOSUB3500: REM HALLAR OBJETO 

2020 GOSUB4000:COMPROBAR PARACHOQUES 

2030 REM ** HALLAR EXTREMO ** 

2040 WY=RT:SP-WD:GOSUB6000:REM SO N DEAR 

2050 I F(PEE K( RE G D AT) AN D1 92) <> LB THEN 2040 

2060 REM * " RETROCEDER Y AVANZAR HACIA EXTREMO 4 " 

2070 DR=LF:DS=WD:GOSUB6000:REMS0NDEAR 

2080 DR=RT:DS = SW:GOSUB60QQ;REM SOW DEAR 

2000 IF{PEEK(REGDAT)AND 192)<>LB THEN 2080 

2100 PR I NT "HAL LAD 0 EXTREMO DERECHO" 

2110 PRINT" COMIENZA LA MEDICION" 

2120 REM** EMPEZAR A MEDIR 1 * 

2130 CC=WD 

21 40 D R= LF: DS - WD :GOSUB60O0 : CC = GC + WD 
2150 IF(PEEK(REGDAT)AND 192}<>RBTHEN 2140 
2160 REM ** RETROCEDER Y AVANZAR HACIA EXTREMO ** 
2170 CC=CC-WD 

2180 DR=RT:DS=WD:GOSUB600G:CC=CC+SW 
2190 IF(PEEK(REGDAT)AND 192)<>RB THEN 2180 
220O POKE REG DAT, 0 
2210 RETURN 
2220 : 

3000 REM"**IMPRESION**** 
3010 PRINTCHRS(147J 

3020 PRINT" EL LADO DEL OBJETO MIDE ,h ;CC; l< MM" 
3030 RETURN 
3040 : 

3500 REM HALLAR*'** 

3510 DR=FW:DS=S;GOSUB70QC:REM MOVER 

3520 I F( PEE K ( R EG DAT) AN D1 92} = N 8 TH EN 3510 

3530 RETURN 

3540 : 

4000 REM **** COM P ROB A R PARACHOQUES '*** 
4010 IF( PEEK{ REG DAT) AN D 1 92) = RB THEN 

SS-RT:GO$UB5000:RETURN 
4020 I F( PEE K f R EG DAT) AN D 1 92) = LB THEN 

SS=LF:GOSUB500O:RETURN 
4030 RETURN 
4040 : 

5000 REM****BUSCAfi(SS)**** 

5010 Dfi = FW:DS=8:GOSUB700ftnaillO« 

5020 IF(PEEKffiEGDAT)ANDl92}=NBTt£Ji 5010 

5030 RETURN 

5040 

6000 REM****SONDEARM'Y.SP,"" 
6010 lf WY=flT THE* OHf =LF 
6020 WY=LFimi OW=FTT 
Bam D8=9^DS=30^OSUB70CXhRBi MOVER 
GMO DR=Mrj^G=9Q-GOSUB7S00tflai6IRAR 
6050 !W=FW:2S-SJ*15QStfJ7000:R£M MOVER 
9060 OR=0W-J^=90tGGSWSncfBiGIRAR 
5076 DR=FW£S=aS05UB7D0GTCM MOVER 
6080 !FfPSK(REGOAT)Alim92)=»« THEN 6070 

z.y. z r. z \ 

6100 : 

7000 REM MOVER (DR. OS) 

7010 POKE REG DAT, (PEEK(REGDAT) AND 1)0R DR 

7020 PL=PD*DS 

7030 FOR 1=1 TO PL:GOSUB80O0:NEXT I 
7040 RETURN 
7050 : 

7500 REM **** GIRAR (DR,AG) "** 

7510 POKE REGDAT, (PEEK{REGDAT)AND 1}OR DR 

7520 PL=PA*AG 

7530 FOR 1=1 TO PL:G0SUBS0OO:NEXT I 
7540 RETURN 
7550 : 

8000 REM **** IMPULSO 
8010 POKE REGDAT,PEEK(REGDAT)OR 8 
8020 POKE REG DAT, PEE K( RE G DAT) AN D 247 
8030 RETURN 
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Para conocerte mejor 

En nuestra serie dedicada al software vertical analizaremos un 
juego de programas para la "clasif icacion de la personalidad" 



Human Edge Software, una empresa de programa- 
cion con base en California, ha dado un paso inter- 
medio hacia la inteligencia artificial. Los programas 
de Human Edge constituyen retmadas herramien- 
tas para tomar decisiones comerciales, que trabajan 
rapidamente a partir de grandes cantidades de in- 
formation que le proporciona el usuario, evaluan- 
do los datos de acuerdo a criterios almacenados y 
produciendo luego un curso de action aconsejable. 
Human Edge es un juego de cuatro programas 
(Communication edge, Sales edge, Management 
edge y Negotiation edge) para maquinas IBM y 
compatibles. Se afirma que con el se "incrementan 
las aptitudes profesionales individuates del usuario" 
en las areas especificadas en los nombres de cada 
uno de los programas (comunicaciones, rentas, di- 
rection y negociaciones), Para el Commodore 64, 
el Apple II y el Macintosh se ha creado una version 
reducida, llamada Mind prober, que utiliza las mis- 
mas tecnicas; pero en este capftulo nos centraremos 
en eJ juego de cuatro programas. 

Se dice que los programas son el producto de 
mas de diez anos de desarrollo, suponiendo el tra- 
bajo de cientifkos del comport amiento y expertos 
en gestion empresarial, e incorporando nuevas tec- 
nicas como el analisis de factores hum anos. tecno- 
logfa de sistemas expertos y matematica de teoria 
de decisiones. 

Esia description suena bastante tecnica suma- 
da a! costo de los programas, podria mtimidar al 
usuario potentiaL No obstante, los programas son 
faciles de utilizar y se los puede hacex operar ai 
completo en me nos de una bora de autoaprendi- 
zaje. Todos eDos se ejecutan a traves de menus y 
estan consmudos en base a extensos euestionarios 
compuestos por una serie de sentencias cui dado sa- 
me nte red act ad as sobre las que se invita al usuario 
a expresar su conformidad o disconformidad. Las 
sentencias se dirigen a la evaluation de las caracte- 
risticas significativas de la personalidad del usuario, 
asi como sus perspectivas de ventas, clientes actua- 
tes, subordinados y superiores de la empresa, y 
cualquier aspecto de las relaciones empresariales 
que desee investigar el usuario. 

El programa evalua las respuestas y prepara un 
informe detallado, incluyendo un curso de accion 
recomendado. Las recomendacion puede ser la su- 
gerencia de aproximarse abiertamente a un nuevo 
cliente, una eficaz estrategia de cierre para una 
venta diftcil o tecnicas de negociatidn a utilizar con 
empleados o jefes, 

Cada programa comienza con un cuestionario de 
autovaloracion que incluye sentencias tales como: 
"Yo asumo el mando en la mayoria de las reunio- 
nes", "Discuto con los demas mas que la mayoria", i 
"Soy m&s bien impulsivo'% etc. El usuario decide si 
la sentencia es una descripci6n exacta de si mismo y ^ 
luego entra su respuesta. La herramienta de auto- o 



valoracion se ha preparado con gran eficatia, con 
una considerable superposition de preguntas como 
medition interna de validez. Por lo tanto, las res- 
puestas del usuario a "Soy mas bien impulsivo" y a 
"A veces actuo sin pensar" se evaluaran una en re- 
lation a la otra por razones de coherencia, Comple- 
tada esta section, las respuestas se almacenan en 
disco. Estas se pueden actualizar y volver a utilizar 
en cualquier momento. 

Despues de efectuada la autovaloraci6n, se soli- 
cita al usuario que exprese su acuerdo o desacuerdo 
con una serie de adjetivos relacionados con el obje- 
to de la investigation. Para ayudar al usuario a eva- 
luar a su cliente, su empleado o su jefe, se utilizan 
palabras tales como hablador, aprensivo, indepen- 
diente, tenaz, ambitioso, cortes, ostentoso, etc. Al 
trabajar con esta lista es de gran ayuda tener a 
mano un buen diccionario de ingles norteamerica- 
no para comprender algunos terminos, porque el 
Oxford English Dictionary no reconoce determina- 
dos calif icativos. 

EI usuario puede desplazarse por la lista de adje- 
tivos y cambiar sus respuestas en cualquier momen- 
to. Al igual que (a autovaloracion, la lista se guarda 
en disco, si bien tarn bien puede actualizarse segun 
lo dicte la experiencia. 

Solo es neeesario co triple tar la autovaloracitfn 
una vez: luego puede ser recuperada desde el disco 
y utilizada en relation a cualquiera de las otras lis- 



1426 





Software vertical/Software 




tas del "oponente". Se pueden guardar en disco 
hasta ocho evaluaciones de bponentes. Cuando hay 
presentes dos listas completas, el program a toma 
las respuestas y las evalua, preparando despues un 
informe eo el cual se sintetizan las caracteristicas 
del usuario y su tenia, 

El siguiente informe, generado por Communica- 
tion edge, esta basado en un usuario real y su opo 
nente (el hijo adolescente del usuario), describien- 
dose este ultimo como "senor T" (de test: prueba). 
El informe se presenta como si el ordenador le es- 
tuviera hablando direct ame nte al usuario: 

Para comunicarte con el sehor T necesitards usar 
tu enfoque flexible y estable de aproximacion a la 
gente. El sehor T es una persona muy reservada que 
prefiere estar sola y tiene muy poca paciencia para 
mantener charlas y relaciones sociales. Cuando le 
pidas sus ideas y sus impresiones, espera de el una 
actitud dnica o sospechosa, Cuando le hables, no 
supongas por defecto que te esta entendiendo. Se 
claro, conciso y directo. 

Contrastando con tu estilo sereno, el sehor T se 
enfada enseguida e incluso puede parecer enojado 
antes de que comience la conversation. Podria tratar 
de imponenesus propias opiniones, Se cordial, aun- 
que se porte asL No te extrahes de lo imprevisible de 
su comportamiento. El sehor T puede hablar de 
forma impulsiva durante un minuto, para, al minuto 
siguiente, escoger con sumo cuidado coda una de 
sus palabras. Asume el papel de director del proceso 
de la conversation* Parafrasea sus comentarios para 
conseguir claridad y llegar a un acuerdo. 

Los padres probablemente reconoceran la descrip- 
cion de un tipico adolescente, si bien Communica- 
tion edge no hace preguntas acerca de la edad del 
sujeto (sin embargo, si se tiene en cuenta el sexo). 

El vocabulario empleado en los informes les sera 
familiar a quienes lean las columnas de consejos de 




los periodicos o a quienes hayan participado en 
tests de personaiidad similares. El usuario por lo 
general se describe en tSrminos amables ( u de tem- 
peramento serene, flexible, estable"), mientras qiie 
el oponente se ve menos favorecido ("se enfada en- 
seguida, es impredecible, cinico, desconfed: Ei 
probable que esto este disenado para reforzar lit 
imagen que el usuario tiene de si mismo y cdz= 
para ajustarse a la forma de pen^: : . 
mericanos, en el sentido de considerai los oe^x>;«5 
como una guerra, siendo la prevision de veatas o d 
cliente el enemigo cuya resistencia se debe *ez:e: 
En Negotiation edge este enfoque se nice i±l 
mas evidente; en el mismo dichas estrategia* re- 
comiendan (impresas en mayuscula) corr.„ 

SAQUE PARTI DO DEL CONOCIMIENTO QUE 

POSEE SOBRE EL SR T 

PREPARE AL SR T CON UNAS TEVPRA\^3 

CONCESfONES 

ACOSTUMBRE AL SR T A DECIR S 

ENCUBRA SUS AMENAZAS 

EXAGERE SUS PROBLEMAS 

SIMULE LA CUANTfA DE SUS BENEFOOS 

PASE UN BUEN INFORME 

Parece ser que quienes desarroUaron los programas 
asumieron que un usuario solo tendria unc de los 
cuatro programas, dado que cada una de ellos 
exige que el usuario complete una amovaJoracion 
independiente, presentando preguntas similares 
por un orden liger amente distimo. A ^:s:a del 
precio, esta suposicion parece razonable: pero 
puesto que una organization grande r:: : ■ ': Amen- 
te deseara utilizarlos como herramientas para la di- 
reccion, hubiera sido mas provechoso poder em- 
plear en los cuatro paquetes la misma autovalora- 
cion, Pero, dado que los programas son tan pareci- 
dos, uno sencillamente puede tomar el menos caro 
del juegOj el Communication edge, y adapt ar sus 
informes de modo que se adapten a las divers as si- 
tuaciones. 

Una importante objecion a senalar en los progra- 
mas, cuando se los va a utilizar como herramientas 
de direccion, es su incapacidad para aprender a 
partir de la experiencia, a exception de la propia 
actualization que efectue el usuario de sus valora- 
ciones. Por ejemplo. para este seria de gran valor 
poder entrar los resultados de una estrategia pro- 
puesta de modo que pudiera modificarla a la luz de 
la experiencia. especialmente para la evaluacion de 
sujetos de quienes initial mente se sabe muy poco. 
Ademas, muchas de las preguntas son dificiles de 
responder sobre una base estricta de "estoy de 
acuerdo o no lo estoy", y no existe evidentia de una 
estmctura arborescente para la formulation de las 
preguntas f lo que permitiria la ampliation o verifi- 
cacidn de las respuestas. Una solution podria se: 
incluir una option "no lo se", que abriria entonees 
el camino para una pregunta de nivel inferior que 
se pudiera responder afirmativa o negativamente* 

En el analisis final, uno puede creer o no en ti t 
tipo de enfoque a las relaciones hum anas. Qui 7 A la 
forma mas rentable de utilizarlo seria como ayuda 
para una preparaci6n concienzuda antes de una en- 
trevista 3 pero entonces el usuario habra de tener 
cuidado en no torn arse demasiado al pie de la letra 
los consejos; al menos no hasta que los ordenado- 
res se conviertan en maquinas realmente pen- 
santes. 



Thttattn Edge 

*jsqd de cuatro paquetes 
fqKse pueden adquirir por 
^caiado) para maquinas 
V5-D0S y PC- DOS 

Dtstnbuidor: 
~ ; 1 EM! Computer 
Scfrivare Distributors, 296 
?arn bo rough Road, 
-amborough, Hants GU14 
7NF. Gran Bretaria 
Auto res: 

Human Edge Software, 

California 

Fannato: 

Disco 



Mind Prober 

Para el Commodore 64. el 

Apple II y el Macintosh 

Distributor 

Ei mismo 

Autores: 

Los mismos 

Formato: 

Disco 
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Pacman 



Presentamos una version para el Oric de este famoso y pionero 
juego de laberinto 



CAPS 




Este listado ofrece dos partic.ularidades: 

L Hay solo un fantasma. 

2. Al ingerir las "pildoras de energia", el juga- 
dor obtiene puntos, pero no puede comerse al fan- 
tasma. 

Utilice las teclas de control del cursor para des- 
plazarse por la pantalla. 



30 RE-0:GOSUB900O 
40 GOSUB SO DO 

50 V% - 1 9:H% = 1 9:G0S UB 7000 
60 PLQTH%,W " 
70 AS = KEYS 
80 A-DEEK(7B3] 
90 REM 

95 H1%=H%:V1%=V% 

100 m; 

110 IF A-48351 THEM H%- H % - 1 : MS= * '" 
120 IF A-48255 THEM H%=H%+1: MS- " % " 
130 IF A=4831 9 THE N V% = V%+ 1 : M£= " & " 
1 40 IF A=48375 THE N V% - V%- 1 : MS™ " S " 
150 IF H%<1 THEN H%"38 
160 IF H%>38THEN H%-1 

m PLAY 0,1, 1.10 

170 IF $CRN(H%,V%)=44 THEN V%= V1%:H%=H1% 
:G0TO 210 

1 SO IF SC FtN ( H% , V%} = 46 THE N SC% -SC%+1 :C0% 
-CG%+1 

190 IFSCRN[Htt.V%}=111 THEN GOSUB 1000 

200 IF SC RN (H% , V%) = 43 THEN GOTO 5000 

210 PLOT H%.V%,MS 

220 PLOT 1,25/' PUNT0S : " + STRS(SC%) 

230 PL0TX%,Z%,CS 

240 Z1%=Z%:X1%=X% 

245 IF M1%>3 THEN M1%=D 

250 IF M1%-0 THEM Z%-Z%-1 

260 IF M1%=1 THEN X%-X%-1 

270 IFM1%=2THENZ%-Z%+1 

280 IF M1%=3 THEN X%=X%+1 

281 PLOT H%.V%,"# !n 

290 IF SCRN(X%,Z%)=44 THEN Z%=Z1%:X%=X1 % 

:M1%=INT(RND(1)*4) 
300 IFSCRN(X%,Z%)<40AND SCRN(X%,Z%)>33 

THEN GOTO 5000 
310 CS-CHRS (SCRN(X%,Z%» 
320 PL0TX%,Z%."+ M 
330 IF LV%<1 THEN GOTO 2000 
340 IF C0% -T% THEN CO%=0:GOTO 50 
350 GOTO 60 

1 000 SC% -SC%+ ( I NT( RN D( 1 J * 20)) + 20 
1010 ZAP 
1020 RETURN 



2000 CLS 
2005 ZAP 

2010 PRJKT,„/SE«aBO" 
2020 PRINT 

2030 PRJNT„/PUNTOS";SG^ 
204D PRINT 
2050 PRINT 

2060 IFSC%>RETHEN RE=SC% 
2070 PRI NT, , 11 MAR CAD0 R ACTUAL: p fi E 
2OB0 PRINT 
2090 PRINT 

21 00 PRI NT , " P U LSAR U N A TECLA PARA J UG AR " 

2110 IFKEYlO " THEN GOTO 2120 

2120 GET KS 

2130 GOTO 40 

5000 PLQTX%,Z%,"~ n 

5010 PL0TH%,V%,"# p 

5020 PLAYI.0,1,10 

5030 WAIT 15 

5040 PLOT K%,V%,T 

5050 PLAY 1,0,1,20 

5060 WAIT 20 

5070 PLOT H%,V%, ')" 

5080 PLAY 1 .0,1,25 

5090 WAIT 30 

5100 PLOTH%,V%,'*" 

5110 PLAY 1,0,1,30 

5120 WAIT 40 

SI 30 PL0TH%,VV ' 

5140 PLAY 1,0,1 ,50 

5150 EXPLODE: WAIT 100 

5160 CO% - 0:V% = 1 £ H% = 1 6: IV% - LV%- 1 

5170 fFLV%<1 THEN 2000 

5180 GOTO 50 

7000 CLS; PAPER O INK INT (RN0(1}M)+3 

7005 PLOT 0,25,6 

7006 PING 

7010 PRINT" ,, „,„.., , „ 



7020 PRINT' ,- 
7030 PRINT V, 
7040 PRINT",-, 



7050 PRINT',0, , 

,0," 

7060 PRINT: , „.„-—, ,—--„, 

7070 PRINT",-..,- 

70SO PRINr, - - - 

7099 PRINT,- — „- „,,,„„„,,,- 

7100 PRINT" — - , , - 

7110 PRINr,,, „-,,-„, „,,,,„„, - 

7120 FAINT -„-...„ , - 

7130 PRINT" -„- - 

7140 raKr,.,,,— - 

7150 PRINT', — ,.- , .- 

7160 PRINT y,„-„ - 

7170 PRINr,-,,,- „„,-,„- m 

7180 PRINTV---- ™— , , ,,, 

7190 PRINF,-,,, -„, 

7200 PRINF.O, , — - 

— , ,0," 

7210 PRINT".-,,,-,.., -„,- „, 

7220 PRINT", - -, , 

7230 PRINT 1 , „„,,„„, , t! ,,, • (u 

7500 RETURN 
8000 M$="%" 
8010 C1%-8:M1%=0 
8020 SC%=0 
8030 Z%-7:X%=19 
8040 LV%=3 
8050 C0%=0 
8060 T%=312 
8070 RETURN 

9000 FOR U - (46080 + {ASC( " # " ) %)} TO (46080 

+(AS0r,") T 8)+7) 
9010 READ US:POKE U,US:NEXTU: RETURN 
9020 DATA 0,30,63,63,63,63,63,30 
9030 DATA 0,18,51, 51, 63,63.30, 12 
9040 DATA 0,30.63.60,56,60,63,30 
9050 DATA 0,12,30,63, 63,51 ,51,18 
9060 DATA 0,30,63,1 5, 7, 15. 63 r 30 
9070 DATA tLO. 0,0. 63. 63, 63, 30 
9080 DATA 0,0, 0, 0,8.12, i 2,30 
9090 DATA 0.33, 18 12,0.12,18.33 
9100 DATA 0,1 2,30,56,63,63,63,42 
911 0 DATA 63,63.63,63.63,63,63,63 
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Mejorando lo presente 



Acaba de aparecer el RS128, de 
Memotech, que incorpora 
facilidades compietas de 
interface 



A pesar de ser maquinas tenidas en muy buena esti- 
ma, la serie de microorden adores Memotech 500 
(el MTX500 y MTX512) ha sido ignorada en gran 
medida por los compradores de ordenadores perso- 
nates. Caracteristicas atractivas (tales como grafi- 
cos en alta resolution, un ensamblador incorpora- 
do, un basic sofisticado y un lenguaje exclusivo 
para tratamiento de textos denominado noddy) 
por cierto no han restado merito a estas maquinas; 
el fracaso que representa no haber conseguido un 
gran exito a nivel popular se puede atribuir a que 
quedan comprendidas entre dos segmentos difcren- 
tes del mercado de ordenadores personales. 

Por un lado, su precio tal vez las haga poco ase- 
quibles al amante de los juegos, quien puede pen- 
sar que las caracteristicas mas sofisticadas no valen 
el costo mas elevado. Por otra parte, el usuario 
"serio" (Memotech afinrm que la serie esta dirigida 
al usuario de pequena empresa) puede desanimarse 
por el hecho de que la serie 500 carezca de interfa- 
ces incorporadas, lo que permitiria la conexion de 
unidades de disco, Estas interfaces si se pusieron a 
la venta, pero salieron como clementos separados, 
disenados para instalarse en un conector marginal 
situado en el interior de las maquinas. Esto no es 
demasiado sorprendente tratandose de una empre- 
sa que cimento su nombre a traves de la producci6n 
de placas accesorias para el ZX81 , pero si es posi- 
ble que hay a fracasado en impresionar a los usua- 
oos que deseaban una maquina list a para enchufar 
y poeer en funcionamiento. Memotech parece 
haber reconocido este problems y ha introducido el 
RS128, una maquina con interfaces incorporadas. 

El aspecto de la maquina 

A primera vista, el RS12S parece identico a la serie 
500; da la impresion de ser elegante y estar un poco 
por encima del nivel medio del mercado. Al igual 
que sus medio hermanas, la maquina tiene una car- 
casa de aluminio en vez de la habitual de plastico, y 
ello hace que la maquina Memotech sea considera- 
ble mente mas pesada que la mayoria del resto de 
micros. Hay un teclado QWERTY estandar y un 
teclado numerico, que Ueva algunas de las instruc- 
ciones para el lenguaje de programaeidn de textos 
noddy. A la derecha del teclado numerico hay, asi- 
mismo, ocho teclas de funcion programables. Las 
teclas poseen un tacto excelente y est an disenadas 
de acuerdo a un elevado estandar profesionaL 

El trazado tiene algunos problem as menores: la 
tecla Return no es mucho mas grande que las teclas 




normales y al principio los mecanografos al tacto 
tend ran dificultades para localizarla, y la tecla De- 
lete no esta en el teclado de maquina de escribir 
propiamente dicho, sino situada en la zona del te- 
clado numerico. En el rincon superior derecho hay 
una tecla Backspace pero, a diferencia de la mayor 
parte de los teclados de ordenador, en los que 
Backspace actua tambien como tecla Delete- left 
(conocida como "retroceso con elimination"), en el 
Memotech es simplemente un cursor-izquierda- 

En la parte posterior de la maquina hay numero- 
sas interfaces. Algunas de estas se suministraban 
con la serie 500 y otras son adiciones recientes, En 
el extremo izquierdo hay un par de puertas RS232 
que permiten conectar la maquina a unidades de 
disco flexible FDX. Estas puertas tambien se pue- 
den utilizar para otros fines, como irnprcsoras en 
serie y comunicaciones en Ted. A la derecha de las 
RS232 hay un enchufe hembra para video com- 
puesto y un enchufe hembra para alta fidelidad 
(este ultimo permite amplificar ei sonido del orde- 
nador a traves de un sistema estereo normal). El 
conector de potencia y el enchufe hembra RF vie- 
nen a continuation, seguidos por una interface para 
impresora tipo Centronics. La interface para cas- 
sette se componc de un par de conectores mi- 
crojack, para EAR y MIC, en el mismo estilo que 
el Sinclair Spectrum. Por ultimo, hay un par de 
puertas para palanca de mando tipo Atari de nueve 
patillas. 

Las puertas para interfaces est an sehaladas con 
letras blancas, que se pueden leer claramente desde 
la parte de atras de la maquina. Esto parece que 
podria permitir enchufar los perifericos sin tener 



Mode Id perfeccmnado 

El Memotech RS128 es una 
versidn perfeccionada de !a se r r 
MTX500. Este nuevo model o 
esta dotado de conectores 
RS232 gemelos, lo que permite 
que la maquina soporte las 
unidades de disco flexible FDX. 
Ello significa que el ordenador 
es particular mente atractivo para 
el usuario serio de un micro 
personal o para el usuario de 
una pequena empresa 
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RAM para el usuario 

El Memotech RS123 posee 
64 K de RAM disponibJes para 
ef ernpleo de la CPU 



Moduladorde RF 

Produce una serial que 
permits que el RS128soporte 
una pantafla de television 



Chip de graficos 

Este chip tarn b fen lo utfJizan 
las maqumas MSX 



PI a c as de ampliacitin 

Estasplacas, que en el 
Memotech 500 y 51 2 son 
opcrcnales, estan instaladas 
en el RS128 como estandares 




Puertas para 
palanca de mando 

Estas puertas permiten 
acoplaral ordenador palancas 
de mando estandar Atari 



Placa RS232 

La placa RS232 controla Jas 
comunicaciones en serie del 
ordenador. Permite la 
conexidn a la unidad de disco 
FDX. asi como a modems 



La unidad central de 
proceso dei R3128 es un 
chip Zrlog Z80A 



RAM de video 

A diferencia de otras 
maquinas, los ordenadores 
Memotech poseen su propia 
RAM de video. EUo signiiica 
que la memoria de pantalla no 
ocupa RAM para el usuario 



Conector para 
pantalla 

Esta interface permite al 
RS128 activar una pantalla de 
video compuesto 



Disco de sillcio 

Esta placa contiene 64 K de 
"RAM extras. Noes 
di recta men te accesible por la 
CPU (que solo puede acceder 
a un maxima de 64 K) , pero 
actua como si estuviera 
almacenada en un disco 
externc. Sin embargo, la 
velocidad deacceso se 
incrementa notablemente 



que inclinarse por arriba para mirar la parte de 
atras. Lamentablemente, Memotech ha colocado 
las puertas en depresiones de la maquina, de modo 
que el usuario tendra igualmente que estirarse por 
arriba para localizar los enchufes. 

La pantalla de basic, de 24 por 40 caracteres, 
esta dividida en tres secciones, que se aprecian en 
el mom en to del encendido. Las 19 filas superiores 
corresponden a la pantalla principal, donde se vi- 
sualizan los listados de programas. Debajo esta la 



pantalla EDIT, donde se entran las nuevas lineas. En 
la parte inferior de la pantalla hay una unica lfnea 
para la visualizaci6n de mensajes de error . Al igual 
que las maquinas Sinclair, las lineas de programa se 
modifican m edian te el empleo de una instruction 
EDIT. Ademas, el sistema operativo no permite la 
insertion de una linea en el programa desde la pan- 
talla EDIT si la line a contiene un error de sintaxis. 

El basic es muy similar al MSX, con instruccio- 
nes tales como SOUND, PAPER, INK y CIRCLE, Sin 




ch RS12J 



embargo tambi6n contiene algunas utiles instruc- 
iones de las que carece el basic MSX. Estas, en 
.onjuntb, estan relacionadas con las capacidades 
:ara tratamiento de pantalla de la maquina. A 
~iodo de ejemplo, la instruction CSRx,y positional 
el cursor en el punto de la pantalla especificado por 
Sas coordenadas (x s y). Una instruccion mis potei> 
:es es CRVS, que permite que el usuario defina una 
ventana en cualquier lugar de la pantalla, Denrro 
de estas ventanas se puede visualizar tanto texto 
:omo graficos. 

El lenguaje tiene incorporadas, asimismo, ins- 
Tucciones para controlar sprites. En este sentido, 
ma instruccion particuiarmente util es GEN PAT, que 
xrmite establecer el patron del sprite, en vez de 
:ener que colocar el patron en sentencias de datos, 
Los graficos del Memotech los proporciona el chip 
le video TMS9929A, que es el especificado para 
las maquinas MSX. 

El procesador central de las maquinas Memotech 
es el Z80 y este ? por supuesto, les permite ejecutar 
el sistema operative CP/M, Muchos pequenos fa- 
*:iricantes de ordenadores eligieron el procesador 
Z80 porque ejecuta CP/M, lo que evha el problema 
de tener que generar una gran base de software 
para que los usuarios puedan sacar el maximo parti- 
:o de un ordenador nuevo. Evidcntememe, para 
aprovechar al maximo el CP/M, el ordenador ha de 
tener una pantalla de 80 columnas y, aunque es inu- 
iual, Memotech proporciona, dentro de la unidad 
ie disco, una placa para uso de 80 columnas. Las 
unidades, por su parte, son de doble cara y doble 
densidad, y su velocidad de transferencia al ordena- 
dor es de 9 200 baudios, 

Con la unidad de disco se suministra un lote de 
software. A parte del disco de sistema CP/M, el pa- 
quete incluye el procesador de textos NewWord, la 
noja electronica SuperCalc, Compact y Televideo, 
que permiten que las unidades lean discos escritos 
en otros formatos de disco (segun Memotech, ello 
iicluye a los discos IBM) y Contact, que hace posi- 
lie enlazar la segunda puerta RS232 en un sistema 
ie red. 

y El RS128 posee 128 K de RAM, No obstante, 
jado que emplea un procesador de 8 bits, solo es 
:apaz de direccionar 64 K, utilizandose los otros 64 
K como un "disco de silicio". Un disco de silicio 
dlmacena archives y programas exactamente de la 
nusma forma en que lo hace un disco flexible, pero 
:omo esta retenido en chips, es hasta 50 veces mas 
rapido que un disco flexible convencional, La infor- 
mation almacenada en un disco de silicio se trans- 
nere a RAM direccionable cuando asi se requiere. 

El manual que se proporciona con la maquina es 
mucho mas grande que los que se surninistran nor- 
mal me nte con ordenadores person ales, si bien eiio 
se debe basicamente a que no ha sido tipografiado. 

no a que incluya much a mas information, Sin em- 
bargo, Memotech ha incluido todos los detalles tec- 
nicos que puede necesitar un usuario, incluyendo 
ziagramas de circuitos y Ilamadas al sistema opera- 
: .o. 

Al perfeccionar la serie 500 con el RS128, la em- 
tresa se ha esforzado tenazmente por producir un 
:rdenador de oficina estandar. Por su precio, la 
ulna ciertamente entra en competencia con el 
- -.lair QL, eJ BBC Micro y el Commodore Plus/4. 
Sm embargo, queda por ver si generara un volu- 
aen de ventas comparable al de sus rivales. 




Unidad de disco gemeia FDX 

Esta unidad permrte que el ordenador ejecute el sistema operative 
CP/M. Cada una de las unidades de disco de 5 1/4 pulgadas 
puede almacenar hasta 500 K de informacitin 
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Utilidades 



MEMOTECH 
RS128 



DIMENSIONS 



488x202x56 mm 



Z80A operando a 4 



MEMORIA 




K de RAM y 24 • : . - . 



PANTALLA 



40x24 en modal :-: :- - 
Modalidad de texic :~r z~t 
texto en 32x24 y 255 ^S: 
en 16 colores. Exisrtr sn 
facilidades para cortraSar -a 
32 sprites de forma 
independiente 



INTERFACES 



Puertas para casseteNCs 

EAR); interface :-. E I :: : 

puertas para :i :e 

dos puertas RS232: ytffcfe 5an 

hi-fi; ench. ; 7 ; . 

compuesto; sncMe s» Tfr 

interface e- iz i 



LENGUAJES 



3AS : - 



teclm: 



57:-: - :: 
e$: - ie = 
a ,f:::i: :i 



:■= a -5232 

atipjaaor? rouy atractrvn para el 
-z-i~ : :z'-."i seno y os 
vssanos de gestion de pequenas 
empresas 



DESVENTAJAS 



Hay poco software escrito 
especiafmente para la maquina 



Software 
de apoyo 

Estos son algunos de los 
paquetes de gestion yce 
juegos que se venden para fas 
miquinas Memotech. En 
comparacidn con otras 
maquinas. el software 
disponible es bastard 
limrtado, pero accese ^ a 
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Alta resolution 

Ahora disenaremos y programaremos las visualizaciones de 
©scenarios espectales para el Commodore 64 



iDisparales! 

Laaccidn de " disparo" de la 
puerta para palanca de mando 
se conslgue en el 64 mediante b\ 
empleo de un sprite definido 
como oroyectil. Los contomos 
se consiguen colocando (POKE) 
ceros en la zona de definition, 
leyendo (READ) luego las zonas 
sblidas de sentencias DATA y 
colocandolas en las posiciones 
de sprites adecuadas 

PROYECTIL-SPRITE 1 




EstiiamientQ 4e sprites 

Los valores listados para el 
sprite de la puerta para palanca 
de mando se leen de sentencias 
DATA y se colocan en las 
posiciones de sprites 
apropiadas. Tal como esta 
disenada, la puerta para palanca 
de mando esta demasiado 
comprimida, pero se la puede 
ensanchar horizontalmente 
(como vemos en la ilustracidn) 
cambiando el valor del registro 
de ampliacidn horizontal 

PUERTA PALANCA-SPRITE 0 

1 ?„ 

128543216 8 A 2 u 12864 32 1 6 8 4 2 



El Commodore 64 dispone de facilidades para alta 
resolucion, pero estas solo estan disponibles para el 
programador en lenguaje maquina, ya que no se 
facilita ninguna instruccion en basic para el trata- 
miento de alta resolucion, y llevar a cabo los PEEK 
y POKE correspondientes en basic para producir vi- 
sualizaciones en alta resolution es tan lento que 
esta aplicacion resulta inoperante. En cambio, 
hemes de adaptar las facilidades, relativamente fa- 
ciles de utilizar, que ofrece la maquina. 

Se pueden emplear caracteres para graficos para 
construir letras grandes u otras visualizaciones me- 
diante las combinaci6n de diferentes caracteres. 
Los sprites son un metodo conveniente de introdu- 
cir forrnas en alta resoluci6n cn la pantalla normal 
del Commodore. Los caracteres PET se pueden 
posicionar en la pantalla utiiizando ya sea una serie 
de sentencias PRINT o bien colocando (POKE) el co- 
digo de caracter correspondiente en la pantalla. 
Vamos a demostrar ambos proeedimientos. 

Las lineas 8020-8170 del listado de la pantalla de 
la palanca dc mando comprenden la fectura de los 
datos para los dos sprites utilizados en esta rutina. 
El p rimer o, el sprite 0, se define mediante los pri- 
meros 63 numeros del grupo de sentencias DATA 
comprendidas entre las lineas 8450 y 8497, y repre- 
senta la puerta para palanca de mando {ilustrada en 
el diagrama). Los datos de sprites por lo general se 
situan en ia parte superior de la zona para progra- 
mas en basic, pero cuando se trata de un programa 
en basic extenso estos datos tienen grandes posibi- 
lidades de ser machacados. Una ubicacion altema- 
tiva es la zona del buffer de la cassette, entre las 
posiciones 832 y 1022, donde se puede almacenar 
los datos de tres sprites. Esta rutin a almacena sus 
datos de sprites en esta zona segura. 

El sprite 0 sufre una ampliation al doble de su 
anchura original, para producir la forma final visua- 
lizada, colocando a uno el bit 0 del registro de am- 
pliation horizontal en La tinea 8170, Observe que 
todos los registros que control an los atributos de los 

3 

u 128643216 8 4 2 u 



sprites, como color, posici6n y ampliation, estan 
relacionados con la direccitin de comienzo para el 
chip controlador de video (VIC). Recordar que el 
registro de ampliation horizontal tiene la direction 
VIC -I- 29 es mucho mas facil que memorizar su ver- 
dadera position de memoria (53277). Algunos atri- 
butos de los sprites requieren un registro entero 
para cada sprite (p. ej. n los registros de las coorde- 
nadas X e Y); pero cuando los ocho bits controlan 
i ndepend ien te mente una funtion para los ochos 
sprites disponibles, los atributos se pueden contro- 
lar activando y desactivando el bit apropiado en un 
unico registro. El sprite t se define mediante los 13 
numeros restantes de las sentencias DATA y repre- 
senta un objeto a disparar desde la puerta para la 
palanca de mando. 

Dado que la parte "solida" del sprite 1 es peque- 
na (representa un proyectil), es mas rapido y senci- 
llo entrar en dos etapas los 63 bytes de datos que lo 
defines Primero, colocando (POKE) 63 ceros en la 
zona de definition, y luego leyendo (READ) y colo- 
cando (POKE) los pocos numeros que definen la 
forma. De esta manera podemos omitir la gran can- 
tidad de ceros que, de lo contrario, se requeririan 
como datos. 

Las lfneas 8190-8220 se refieren a la construction 
de series compuestas por un con junto de caracteres 
para graficos PET. LE$ forma una line a horizontal 
en toda la anchura de la pantalla, mediante la com- 
bination de 40 caracteres PET e sped ales de la de- 
recha de la tecla C. DWS es una serie de caracteres 
de cursor-abajo. LSS y RSS son grupo s de diagona- 
ls a izquierda y derecha (en frente y a la derecha 
de las teclas N y M) que se utilizan para formar un 
patron de espina de pescado en el primer piano. 
Este patron ere a en la escena una sensation de pro- 
fundi dad y perspectiva. 

La rutina "Disparo" de la llnea 8310 elige un 
pun to al azar de la parte inferior de la pantalla y 
dirige el sprite 1 hacia el mismo, repitiendose el 
proceso hast a que el jugador pulsa una tecla, Los 
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colores de la pantalla se restauran a los normales, 
se limpia la pantalla y se apagan los sprites antes dc 
retornar al programa principal. Para utilizar esta 
subrutina con Digitaya, debe insertarse esta lrnea: 

3845 GOSUB 8000: REM IMAGEN DE LA PUERTA 
PARA PAUNCA DE MAN DO 

El otro listado proporciona una visualizacion grafi- 
ca para el e scenario ALU de Digitaya y demuestra 
distintos metodos de visualizar caracteres en la pan- 
talla. Las line as de la 7040 y la 7090 leen un cierto 
numero de sentencias DATA y colocan (POKE) los 
valores directamente en la zona de pantalla. En la 
position correspondiente de la zona de color tam- 
bien se le coloca (POKE) el c6digo de color para el 
caracter. En este ejemplo el codigo de color es 2, 
haciendo que los caracteres se visualicen en rojo. 

Para conseguir que las grandes letras ALU se 
desplacen en la pantalla se aplica un truco bastante 
inusual. La primera Hnea de codigos de caracteres 
graft' cos que han de conform a r las letras ALU se 
colocan (POKE) en la segunda lfnea de la pantalla, 
Entonces se llama a la subrutina de la linea 7680. 
haciendo que la pantalla se desplace una linea hacia 



abajo, Luego se puede colocar (POKE) la segunda 
linea de codigos en la misma zona de pantalla que 
la primera, y llamar nuevamente a la subrutina. La 
repetici6n de este proceso para cada una de las 
ocho tineas de codigo hace que las letras ALU pa- 
rezcan desplazarse desde la parte superior de la 
pantalla. 

Se demuestran otros dos procedimientos para 
presentar los datos de caracteres en la pantalla. Los 
caracteres se pueden imprimir (PRINT) directamen- 
te, como en las lineas 7130 y 7140, o leer como una 
scric de datos a imprimir, como es el caso del dise- 
no del signo de interrogation en las lineas 7170 y 
7590-7670. Este segundo metodo permite una sen- 
cillez de diseno dentro de las sentencias DATA, 

Para utilizar esta rutina anada la siguiente linea: 

4565 GOSUB 7000:REM IMAGEN ALU 

Caracter 
graficos 



Escritura de letras 

El escenario de la ALU para 
Digitaya se orea a parti r de tres 
caracteres para graficos PET en 
baja resolucion, como se puede 
apreciar. Las grandes letras 
formadas parecen desplazarse 
hacia abajo, desde la parte 
superior de fa pantalla hasta su 
posicion de descanso 




n 



E 



XL 



para 
PET 



Codigos de pantalla 



□ 
□ 
□ 



oimal 


Invertido 




11 


160 




105 


233 




95 


223 


Q 



Pantalla ALU 



7000 REM"* 4 S/R IMAGEN ALU"" 
7010 VIC= 5324 8:CS - 55296:SC = 1 024 
7020 PRINT CHRS(147}:REM LIMFIAR PANTALLA 

7030 POKE VI€+32.0:POKE VIC+33,Q:REM ESTABLECER PANTALLAyBORDE 
7040 CC=0 

7050 FOR J=1 TO a: GOSUB 7680: REM DESPLAZ. 
7060 FOR I =47 TO 72 

7070 READ A; CC= CC+A: POKE SC+ 1 .A: POKE GS+I.2 
7080 NEXTU 

7090 READ CS:lf CSoCC THEN PR INF ERROR SLIMADE CONTROL" :ST0P 

7100 GOSUB 7680: REM DESPLAZ. 

71 10 PRIHTCHRS (1 5BVREM TEXTO AMARILLO 

7120 FOR 1=1 TO 8 : PR-I NT:N EXT I: REM MOVER HACIA ABAJO 

7130 FRINTTAB(9)' t AND" :SPC(7):"0R' r ;SPq8);"N0T H 

71 40 PRINTTAB (1 0}" 0 " ; SPC(9); " 0 1 ' SPC(9) ; " 0 " 

7150 PRINTCHR$(28);REM PRUEBA ROJO 

7160 REM SIGNO INTERROGACION " 

71 70 FOR 1=1 TO 9: READ OS: PR INTTAB(1 6) OS: N EXT I 

7180 REM ""* ESPERAR TECLA Y REINICIALIZAR "" 

7190 6ETAS:IFA$= ,,M THEN 7190 

7200 POKE VIC+32.14:P0KE VIC+33,6:REM PANTALLA/BQRDE 
72 1 0 PRIM TCH R$ (154): REM LT TEXTO A2U L 
7220 PRINTCHR$(147);REM LIMP1AR PANTALLA 
7230 RETURN 

7240 REM " " DATOS PANTALLA 
7250 REM " FILA1 " 

7260 DATA 160,32,32.32,32.160,32,32.32.32 
7270 DATA 95,160, 160,160.160,105 
7230 DATA 32,32,32,32,95,1 60,160,160,160,105 
7290 REM " FILA2 ** 

7300 DATA 160.32,32 .32 , 32, 1 60,32 , 32 ,32 , 32 
7310 D ATA 160,223, 32, 32 , 32, 32.32 , 32.32 . 32 
7320 DATA 1 60,223 , 32.32 ,233 , 1 60 
7330 REM FILA 3 * " 

7340 DATA 1 60 , 32 , 32 .32 .32.1 60.32 , 32.32 , 32 
7350 DATA 160,32,32.32,32.32,32.32.32,32 
7360 DATA 1 60 , 32, 32 ,32 , 32 J 60 
7370 REM FILA4 " 

7360 DATA 160.160,160,160,160,160,32.32.32.32 
7390 DATA 160.32,32,32,32.32,32.32,32.32 
7400 DATA 160,32,32.32,32,160 
7410 REM ** FILA, 5 " 

7420 DATA 160.32,32.32,32,160.32 32.32.32 
7430 DATA 1 60 ,32, 32,32 , 32,32 , 32.32,32,32 
7440 DATA 160,32 ,32,32, 32,160 
7450 REM ** FILA 6 " 

7460 DATA 233,105,32,32,95,223,32,32,32,32 
7470 DATA 1 60 ,32, 32 ,32 , 32, 32 ,32 ,32 ,32, 32 
7460 DATA 1 60 ,32 ,32,32, 32. 1 60 
7490 REM " FILA7 " 

7500 DATA 32 , 233 , 1 05.95 , 223 , 32 ?32 , 32,32 ,32 
75 1 0 DATA 1 60 ,32 , 32 ,32 , 32,32 ,32", 32 , 32, 32 
7520 DATA 160,32,32,32,32,160 
7530 REM "FILA 8" 

7540 DATA 32,32,233.223,32,32,32.32.32,32 

7550 DATA 160,32,32,32,32,32.32,32,32.32 

7560 DATA 160, 32, 32 ,32, 32,160 

7570 DATA 14463: REM SI MA CONTROL 

7580 REM " DATOS SIGNO INTERROGACION " 

7590 DATA " ???? " 

7600 DATA ' ? V 

7610 DATA "? T 

7620 DATA " ??" 



7630 DATA ' ? " 
7640 DATA M ? " 
7650 DATA J ? " 
7660 DATA " 
7670 DATA " • * 

7680 REM "* 1 S/R DESPLAZAR PANTALLA **** 
7690 POKE 216,160 

7700 PRlMTCHR$f19);CHRI(17};CHRS(157):CHRS[H8) 
7710 RETURN 

Pant, puerta palanca 

BDOO REM "' 1 S/R IMAGEN PUERTA PALANCA MAN DO "" 

8010 PRINTCHRS(147):REM LIMPIAR PANTALLA 

8020 S0= 832:S1 =S0+64:REM DIR C0MIEN2O DATOS SPRITE 

5030 CC=Q:VJC-53248;REM COMIENZO DE CHIP VIC 

B040 FOR l=S0TO50+62:READA:CC=CC+AP0KE!.A:NEXTI 

8050 Fafil=S1TOS1+62:PQKEI,Q:NEXTJ 

B060 FOR l=Sl^25TOS1+37:READA:CC=CC+A;POKEIAIiBCri 

8065 READ CS:IF CSoCC THEN PRINT'' ERROR SUMA DE CONTROL" STOP 

6070 P0 KEVIC + 33,0;PQKEVIC +32 . 0 : R EM ESTABLECER PANTALLA BORDt 

8060 REM " ESTABLECER PUNTEROS SPRITES " 

8090 POKE 2040, SO/64: POKE 2041 S164 

8100 REM * * ESTABLECER REGS CONTROL SPRITES VIC " 

81 10 FOKE VI C + 39.7;REM ESTABLECER COLOR SPflfiT 0 

8120 POKE ViC+40.7:REM ESTABLECEH COLOR SPRTTF 1 

8130 POKE VIC, 65: REM ESTABLECER COORD X SPRITE 0 

8140 POKE VIC 1 ,70:REM ESTABLECER C0Q8D V SPRITE 0 

B150 POKE Y1C-2.74 REM ESTABLECEH COORD X SPRITE 1 

8160 POKE VlC-r3.70:ft£M ESTASLECEB COORD Y5PRFTE 1 

- ' k z • l - l- ' -EM AilFUARHORCSPRrTEO 
SI 90 L£$=-'fOR 1=1 T94ttLES-L£S+CHft$(l95}:NEXT I 
B200 ««="J0e 1=1 T025:DWS=0¥fS T CKRS{17):NEXT I 
»IOlfi$=**fORi=1TOt1iSi=LSS-f-CHRS(arj6>+* ":NEXTI 
«ZZD«SS=**J0fil=lTO11flSS=RSS^CHRS{205}+ M "MXT\ 
B3D P«KTCHRS(158):i»J TDOO AMARILLO 
8240 Pf»ITCHRS(19! PftWT TABi.2)" PUERTA PALANCA MAN DO" 
3250 Pflin€HRS(154):REM TEXTO AZUL CLAR0 
3260 PRWTCHRS(ig»:LEFT$<DWS.17];LES 
3270 PRINT CH RS1 14 5); 
6290 PT5=LEFT5{LSS,19)-?-LEFTi{RSS,21} 
3290 PTS=FT5^R1GHTS(LSS,19HR1GHT$(RSS 1 21) 
8300 FOR 1=1 TO 3: PRINT PTS;:NEXT I 
8305 POKE VIC+21 ,3:REM ENCENDER SPRITES 0 & 1 
3310 REM " DISPARAR " 
8320 YB=240:Y1-70 
8330 X1=74:X=INT(RND(1)M50)+24 
8340 G=2'(X-X1)/(VB-Y1) 
8350 FOR Y=V| TO VB STEP 2 
8360 XI =X1 +G-POKE VIC+2.X1 :POKE VIC+3,Y 
8370 NEXT Y 

8380 GET AS: IF A$= L ' " THEN 8330 
8390 REM RESTAUR AR PANTALLA " 
8400 POKE VtC-21 ,0;R£M APAGAR SPRITES 

841 0 POKE VIC+32,14:P0KEVIC 4 33. 6:PEM RESTAURAR PANTALLA/BQRDE 
8420 P Rl HI CH R$ ( 1 47) : REM LI M PiA R PANTALLA 
8430 RETURN 

8440 REM DATOS SPRITE 

8450 DATA 0,0,0,63,255,252,64,0,2,64.0,2 
8460 DATA 1 28,0,1 , 128,0, 1 ,1 62 ,16, 133,1 62,1 6,133 
8470 DATA 128,0,1 , 128.0, 1 ,1 28,0.1 , 123.0, 1 
8480 DATA 129,0,1 ,128,0,1 ,1 36,66, 17,72.66,18 
8490 DATA 64,0.2,64.0,2 ,32, 0 ,4,31 , 255, 248 
8495 DATA 0.0.0,16.0.0,56,0,0.124.0.0,56.0,0.16 
8497 D AT A 3701 :REM SUM A DECONTROL 
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El logo es un lenguaje ideal para explorar las matematicas. A partir 
de procedimientos sencilios se van realizando tareas mas 
complejas 



^De cuantas formas puede uno acomodar a cuatro 
personas en cuatro sillas alrededor de una mesa? 
La primera persona se puede sentar en cualquiera 
de las cuatro sillas r pero despues de haberse senta- 
do, para la segunda persona s61o quedan tres opcio- 
nes t luego quedan dos para la tercera, y a la ultima 
persona solo le queda un lugar. Por lo tanto, la can- 
tidad total de arreglos diferentes es 4x3x2x1. 
Esto por lo general se escribe como 4! y se lee u 4 
factorial". Los f actoriales se encuentran con fre- 
cuencia en problemas matematicos que entranen 
variaciones, combinaciones y probabilidades. 

Es facil escribir una definition recursiva para cal- 
cular f actoriales. En primer lugar, debemos obser- 
var que ei factorial de 0 se define como L El facto- 
rial de cualquier numero positivo distinto de cero 
(p. ej^ x) es el factorial de x-1 multiplicado por x. 
Traduciendo esto en un programa obtenemos: 

TO FACTORIAL :X 

IF :X=0 THEN OUTPUT 1 

OUTPUT (FACTORIAL :X-1)*:X 
END 

Para probarlo, digite PRINT FACTORIAL 6; el resulta- 
do sera 720. 

Este procedimiento funciona bien hasta el nume- 
ro 12, pero, a partir de este, los ntimeros se vuelven 
demasiado grandes como para que el ordenador los 
pueda retener como enteros. En el Commodore 64, 
por ejemplo, PRINT FACTORIAL 13 dio 6.227Q2E9, 
es decir, 6,22702 veces 10 9 . Esto es poco satisfacto- 
ry puesto que se han perdido los cuatro ultimos 
dfgitos. Existen muchas razones (incluyendo la 
pura curiosidad) por las cuales podriamos desear 
conocer cuales son estos dfgitos restantes, Lo pri- 
me ro que nemos de hacer, por lo tanto , es ampiiar 
las capacidades aritmeticas del logo de modo que 
pueda calcular con una precisidn mayor de siete 
cifras. 

Para simplificar el asunto, s61o vamos a eonside- 
rar los enteros positivos. Representaremos a los en- 
teros como listas (de modo que representaremos 
1.234,567 como [ 1 2 3 4 5 6 7]). Los dos procedi- 
mientos siguientes realizaran la suma de este tipo 
de numeros. Probemos con PRINT SUMALARGA[1 2 
3] [5 6 9]; el resultado sera [6 9 2]: 

TO SUMALARGA :X :Y 

OUTPUT SUMALARGA1 :X :Y 0 
END 

TO SUMALARGA1 :X :Y :LLEV0 
IF(ALL0F {EMPTY?:X)(EMPTY?:Y)(:LLEVO 
=0))THEN 0UTPUT[] 
TEST EMPTY? :Y 

IFTRUE IF 1LEVO-0 THEN OUTPUT :X ELSE 
OUTPUT SUMALARGA1 :X [1] 0 



TEST EMPTY? :X 

IFTRUE IF :LLEVO=0 THEN OUTPUT :Y ELSE 
OUTPUT SUMALARGA1 [1]:Y 0 
MAKE "SUMA(LAST :X)+(LAST :Y)+:LLEV0 
OUTPUT LPUT REMAINDER :SUMA 10 
SUMALARGA1-BUTLAST:X 
BUTLAST :Y QUOTIENT :SUMA 10 
END 

Estos procedimientos funcionan de forma muy si- 
milar a la que utilizariamos si hicieramos las sumas 
en papel, sumando desde la izquierda e incorporan- 
do cualquier numero arrastrado desde la columna 
anterior. 

La resta es un proceso similar. No obstante, 
hemos incluido una rutina para suprimir de la res- 
puesta los ceros no signincativos, de modo que no 
acabemos con resultados tales como [0 0 0 7 8]. 

T RESTALARGA 'X *Y 

OUTPUT QUITARCEROS RESTALARGA1 :X:Y 0 
END 

TO RESTALARGA1 :X :Y :PID0 
IF(ALL0F (EMPTY7:X)(EMPTY?:Y)(:PID0= 
0))THEN OUTPUT [0] 
TEST EMPTY? :Y 

IFTRUE IF :PID0=Q THEN OUTPUT :X 
ELSE OUTPUT RESTALARGA1 :X[1]0 
IF EMPTY? :X THEN PRINT [LO SIENT0.N0 
PUEDO MANIPULAR RESULTADOS 
NEGATIV0S] TOPLEVEL 
MAKE "DIFF(LAST :X)-(LAST :Y) - :PID0 
IF:DIFF<0 THEN OUTPUT LPUT (10+:DIFF) 
RESTALARGA1 BUTLAST :X BUTLAST :Y 1 
OUTPUT LPUT :DIFF RESTALARGA1 BUTLAST 
:X BUTLAST :Y 0 
END 

TO QUITARCEROS :X 
IF EMPTY? :X THEN OUTPUT [0] 
IF NOT ((FIRST :X)=0)THEN OUTPUT :X 
OUTPUT QUITARCEROS BUTFIRST :X 

END 

La multiplicacidn larga es algo mas complicada. La 
implementaremos utilizando la tecnica que normai- 
mente se enseria en las escuelas. Por ejemplo, 
vamos a suponer que queremos multiplicar 123 por 
338. El problema se divide en tres partes: primero 
multiplicamos 123 por 8; luego multiplicamos 123 
por 330; y, por ultimo, sumamos los dos resultados 
entre si. Este metodo se basa en el hecho de que la 
segunda etapa se puede dividir en dos subetapas: 
primero se multiplica 123 por 33, y luego se coloca 
un cero al final del resultado. Multiplicar un nume- 
ro por 33 evidentemente implica el uso de la recur- 
sion. EI procedimiento MULTLARGA controla esta 
estrategia general: 
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Factor 
explosivo 

Los valores factorials 
aumentan con pasmosa 
rapidez, como podemos 
apreciaraquf. Debidoa que 
Ids valores se vueiven tan 
grandes, la mayonade los 
crdenadores y calculadoras 
representar^n los factorial es 
de numeros mayores de 12 en 
notation exponential. Porlo 
tanto, el factorial de 12 se 
daracomo4J9E8,o 
479 x10 s . Seincrementa la 
exactitud si se reflejan todos 
los digitos significativos 



. 0! 1 

1! 1 

2! 2 

3! 6 

4! 24 

9! 120 

6! 720 

2! 3.040 

8! §0,320 

9! 312,880 

19! 3228,800 

14! 390916,800 

12! 47^001,600 

18! 6C23ZOD20,800 

19! 8M88C29 1,200 

19! 3, 608,608,368, 000 

16! 30,928,889,888,000 

12! 339,687,«08,O96,OOO 

18! 6JQ2, 323.800. 728, 000 

19! a2.lL6S£<llG)ffiS08,832,000 

28! 2,482,902,008,(1106,640,000 

16! 20,922789.888,000 

P! 355.687,428.096,000 

18! 6AQ2&%W.728M0 

19! i f21 l ,64^;t0O ; 408,832.000 

261 2;4B2,902,008.P6,640,000 



TO MULTLARGA :X :Y 
IF EMPTY? BUTLAST :Y THEN OUTPUT 
- MULTLARGA1 :X LAST :Y 0 

OUTPUT SUMALARGA(MULTLARGA1 :X 
(LAST :Y)D) 

(LPUT "0 MULTLARGA :X BUTLAST :Y) 
END 

Los detalles que supone la multiplication de una 
lfnea por un unico digito los lleva a cabo MULT- 
LARGA1 ; 

TO MULTLARGA1 ;X :NUM 1LEV0 
TEST EMPTY? ;X 

IFTRUE IF :LLEVO=0 THEN OUTPUT [] ELSE 
OUTPUT (LIST 1LEVO) 
MAKE "PROD (LAST :X)*:NUM+ 1LEV0 
OUTPUT LPUT REMAINDER :PR0D 10 
MULTLARGA1 BUTLAST :X :NUM QUOTIENT 
:PR0D 10 
END 

Para el calculo de factorial es no necesitamos proce- 
dimientos que efectuen la division, pero usted 
puede ampliar el sistema para que tambien cubra la 
divisi6n. 

Abora contamos con un conjunto de priraitivas 
para llevar a cabo aritmetica con cualquier grado de 
precision. La unica limitation respecto al tamafio 
de los numeros que se pueden manipular es el espa- 
cio total de memoria disponible para el programa. 

Introduction de 
modificaciones 

Ahora podemos modificar nuestro programa facto- 
rial original para utilizar la nueva forma de multipH- 
cacion larga. 

TO FACT :X 
IF FIRST :X=0 THEM OUTPUT [1] 
OUTPUT MULTLARGA (FACT RESTALARGA 
:X [1]):X 

END 

Para probarlo digite FACT[1 3] ; obtendra [622702 
0 8 0 0]. Sin embargo, existen problemas. El proce- 
so de calculo es lento y (en el Commodore 64) el 
factorial mas grande que obtuvimos antes dc que- 
darnos sin memoria fue 34!, que tiene 39 digitos (y 
calcularlo llevo algun tiempo). 

La expresion de numeros grandes en forma de 
listas puede parecer inusual, pero podemos modifi- 
car el programa para que supere este problema tra- 
duciendo una y otra vez nuestra notation normal a 
la forma de lista. Empleamos dos procedimientos 
(EXPLOSION e IMPLOSION) para hacerlo. 

EXPLOSION 123 produce [1 2 3] e IMPLOSION 

[1 2 3] produce 123. 

TO EXPLOSION :X 
IF EMPTY? :X THEN OUTPUT [] 
OUTPUT (SENTENCE FIRST :X EXPLOSION 
BUTFIRST :X) 

END 

TO IMPLOSION :X 
IF EMPTY? :X THEN OUTPUT" 
OUTPUT (WORD FIRST :X IMPLOSION 
BUTFIRST :X) 

END 
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OOQ. 

933. 
693. 
53Q, 
167, 



130. 

536, 
933, 
693, 
530, 
167. 



S36, 
933. 

530, 



218, 
012, 

160, 
000, 

000 



21 ft 
012, 

160, 
000. 

000 



218, 
000. 

000 



2 

631 
30836 

9336935 
301672180 
12160000000 



2 

631 
30836 
9336935 
301672180 
12160000000 



30836 
9336935 
301672180 
2160000000 



Arboi He numeros 

Losdrboles factorials se 
gene ran utalizando el digito de 
mas a la izquierda de un valor 
factorial como la copa del arbol. 
Los digitos subsiguientes se 
extraen del valor real, de 
izquierda a derecrta, en grupos 
cuyos tamahos van aumentando 
ligeramente. Los grupos se 
colocan debajo del digito que 
constituye la piedra angular de 
una forma de arbol, yen 
posrcibn simetrica respecto al 
mismo, Estediagrama 
representa el factorial de 32. El 
valor se puede leer mas 
facilmente cuando los numeros 
se disponen en grupos de tres h 
como podemos observar 



Estos procedimientos se basan en cl hecho dc que 
en logo los numeros se tratan como palabras, Utili- 
zandolas, podemos ahora definir un procedimien 
to, F: 

T0F :X 

PRINT IMPLOSION FACT EXPLOSION :X 
END 

que calculara el factorial de 13 en respuesta a la 
entrada: F13 + 

El resultado de este calculo (6227020800) es un 
poco dificil de leer como tal Es mas normal inser- 
tar puntos (6.227.020.800), que hacen que resulte 
mas facil de comprender. Los siguientes procedi- 
mientos dividen la palabra cn grupos de tres digitos 
e insertan puntos. 

TO ANADIRPUNTOS :X 

IF ((CONTAD0R :XJ<4) THEN QUTPUT:X 

0UTPUT{WORD ANADIRPUNTOS 

CADATRES :X", ULTIM0STRES :X) 
END 

TO CADATRES :X 

OUTPUT BUTLAST BUTLAST BUTLAST :X 
END 

TO ULTIM0STRES :X 

OUTPUT (WORD (LAST BUTLAST BUTLAST :X) 

(LAST BUTLAST :X) (LAST :X)) 
END 

Debemos, asimismo, modincar F para que incorpo- 
re estos procedimientos: 

TO F:X 

PRINT ANADIRPUNTOS IMPLOSION FACT 
EXPLOSION ;X 
END 



La utilization de F para imprimir los primeros 20 
factoriales nos da una idea de la rapidez con que 
crecen en tamano los factoriales (los resultados se 
pueden apreciar en la tabla que ofrecemos en la 
pagina anterior), 

Habiendo obtenido los factoriales de una gama 
de numeros, podemos comenzar a "jugar" con 
nuestros resultados. Un matematico norteamerica- 
no, por ejemplo, en una ocasion tuvo la briilante 
idea de imprimir numeros factoriales grandes en 
forma de arboles en las tarjetas de Navidad que les 
envio a sus amigos. 

No son muchos los factoriales que poseen el nu- 
mero adecuado de digitos para ser impresos como 
arboles, pero los siguientes procedimientos funcio- 
naran si ello fuera posible: 

TO ARBOL :L 

ARB0L1 1 :L 
END 

TO ARB0L1 :NUM :L 

IF EMPTY? :L THEN STOP 

REPEAT ROUND(20 - :NUM/2) [PRINT1 

ESPACI0] IMPRESiONLINEA :NUM :L 

ARB0L1 :NUM+2 P0DAR :NUM:L 
END 

TO ESPACI0 

OUTPUT CHAR 32 
END 

TO IMPRESIONLINEA ;NUM :L 
IF :NUM=0 THEN PRINT l 'ST0P 
PRINT1 FIRST :L 

IMPRESIONLINEA :NUM - 1 BUTFIRST :L 
END 

TO P0DAR :NUM 1 
IF :NUM=0 THEN OUTPUT :L 
OUTPUT PODAR :NUM - 1 BUTFIRST :L 

END 

Nuevamente debemos modificar nuestro procedi- 
rniento control ador: 

TO F:X 

ARBOL IMPLOSION FACT EXPLOSION :X 
END 

El diagrama ilustra 32! escrito en forma de arbol. Si 
tiene intention de explorar mas estos arboles facto- 
riales, quiza le interesara saber que hay solo tres 
numeros menores de 32 cuyos factoriales se pueden 
escribir como arboles. De los factoriales may ores 
adecuados el siguiente es 59! 



Complementos al logo 

Eniodas las versiones LCSI, utilice: 

EMPTYP por EMPTY? 
AND porALLOF 
TYPE porPRINTI 

Existe, asimismo, una sintaxis diferente para IF. P. 
ej.: 

IF :LLEV0=0[OUTPUT[]] [OUTPUT (LISTILEVO)] 

En lugar de QUOTIENT :X :Y emplee DIV :X :Y en el ' 
SpectrumyROUND (:X/:Y) en el Atari. 

En et Atari utilice SE por SENTENCE. 
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Sistemas operativos/Lenguaje maquina 



El toque FX del 

BBC Micro 

Volvamos a analizar el sistema operative del BBC Micro con mayor 
riqueza de detalles. Fijemos nuestra atencion en las llamadas 
OSBYTE, que ofrecen una conveniente manera de acceder a 
muchas de las funciones del OS de esta maquina 



En un primer momento, al estudiar c6mo se accede 
al sistema operativo del BBC hablamos de un 
grupo de llamadas conocidas genericamente como 
OSBYTE, Eran las que nos permitian modificar el 
comportamiento de varias partes del sistema opera- 
tivo. Por ejemplo, la Uamada OSBYTE *FX4J permi- 
te cambiar la manera en que el ordenador responde 
al pulsar una de las teclas del cursor en un teclado 
del BBC. 

Si se piensa que el numero de estas llamadas su- 
pera el centenar en la version 1.2 del sistema opera- 
tivo, no sorprende tanto el hecho de que ofrezcan 
una manera conveniente de acceder a muchas de 
las funciones del OS de dicho ordenador, Ya vimos 
que el empleo de las llamadas indirectas al sistema 
operativo nos protege contra posibles cambios en la 
configuration del software y del hardware de la ma- 
quina; la OSBYTE nos proporciona el metodo mas 
importante de empleo de las rutin as del sistema 
operativo. 

Antes de avanzar en el ex amen de OSBYTE, hay 
que tener en cuenta que con una maquina pro vista 
de una vieja version 0. 1 varias de las llamadas OS- 
BYTE de las que aqui hacemos referenda no estan 
soportadas. 

Se comprueba ei tipo de version de una maquina 
BBC digitando senciilamente *HELP y RETURN. 

Veamos primero como se emplea OSBYTE desde 
el basic y desde el lenguaje maquina. Como la 
mayoria de fas llamadas del sistema operativo del 
BBC, tambien OSBYTE esta vectorizada. Su vector 
se encuentra en las direcciones &20A y &20B. 

Mas aba jo mostramos los modos de realizar una 
Ilamada OSBYTE. Todos ellos ej ecu tan la Hamad a 
OSBYTE antes mencionada, *FX4 f 1: 



Desde basic 
usando *FX 


Desde basic 
por media de USR 


En cddlga 
maquina 


*FX4 t 1 


A%M:X%=1:D%=USR(&FFF4) 


LDA #4 
LDX#1 
JSR &FFF4 



De estos trcs ejemplos aparece claro que la direc- 
tion a la que hacemos las llamadas a las rutinas OS- 
BYTE es la &FFF4, y los parametros se pasan en la 
Uamada OSBYTE en los registros A, X e Y del pro- 
cesador 6502. Cuando se asigna un valor a A%> a 
X% y a Y% en basic y posteriormente se llama a una 
rutina del lenguaje maquina por medio dc USR o 
CALL desde el basic, el programa en codigo maqui- 



na llamado sera introducido con los registros A, X 
e Y del procesador conteniendo los valores de las 
variables A%, X% e Y%, respect ivamente. 

El empleo de USR en el segundo ejemplo nos 
permite obtener un resultado del programa en codi- 
go maquina y devolverlo a una variable en basic. 
Lo cual es practico con algunas llamadas OSBYTE, 
ya que estas pueden devolver information al basic. 
De ello nos ocuparemos mas adclante. 

En el tercer ejemplo, einpleanios un breve pro- 
grama cn codigo maquina para hacer una Uamada 
OSBYTE; se trata de una sencilla carga de los regis- 
tros necesarios con los valores adecuados y de la 
Uamada OSBYTE a su direcci6n de Uamada, la 
&FFF4. Estos ejemplos ilustran tambien la corres- 
pondencia existente entre los parametros pasados 
al sistema operativo con la Uamada FX (o sea, 4 y 1) 
y los parametros pasados a los registros A, Xe Y 
cuando llamamos las rutinas OSBYTE por medio del 
lenguaje maquina o la Uamada USR. 

Indepen dien te mente del modo empieado para 
llamar a la rutina OSBYTE, el contenido del registro 
A especificara siemprc cual de las muchas rutinas 
es la elegida* Los registros X e Y se utllizan enton- 
ces para pasar parametros a la rutina mencionada 
del OSBYTE. 

Algunas llamadas a OSBYTE no necesitan para- 
metros; otras solo necesitan un parametro que se 
pasar& en el registro X; y las me nos necesitan dos, 
pasados en los registros X e Y. 

He aqui algunos ejemplos dc estas llamadas a 
OSBYTE: 



Sin parametros 


Un parametro 


Dos parametros 


*FX0 


*FX4 : 1 


"FX151 ,96,200 



Hay que hacer algunas observations sobre como 
se llaman las rutinas OSBYTE por medio de *FX, La 
primera es que OSBYTE desconoce completamentc 
las variables en basic, tales como las instruccio- 
nes *. 

Si ejecutamos la codification escrita mas abajo 
obtendremos el siguiente mensaje de error Bad 
Command: 

aM:b=1 
*FX a,b 

Sin embargo, para obviar este problem a se puede 
pasar la instruction FX al OS por medio de OSCLL 
Asi: 
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E.I accede r a las rutinas; del OS 
a t raves die puntos concretos ' 
de entracfa, tales como el 
vector OS BYTE, es una buena 
■ p rati r ca d e program a c ra : ya" ' 
.que protege el software contra 
todo cambio en las posiclones 
del OS, En el basic del BBC 
lay Eres metodos equivalents 
comoaqui se ven: cada uno ' 
de elJos precisa que se ■ , 
imcialice el acurnulador con 
un codigo -defunciony emplea 
losregistroscfeiprocesadorX 
e Y"'pafa el paso 
parametricte>^>>>^- 



10 D1MC 100 
20 a=4 
30 b=1 

40 $C="*FX M +STR$a+V+STR$b 
50 X%=C MOD 256 
60 Y%=C DIV 256 
70 CALL &FFF7 

La segunda observation sobre las llamadas FX se 
refiere a que no se puede poner nada mas en una 
Imea de programa despots de ellas. 
Veamos: 

*FX4 T 1:PRINT n Oooops!" 

Esta lmea volvera a darnos el mensaje Bad Com- 
mand: el sistema operativo considera los dos puntos 
y la instrucci6n PRINT como parte de la instruc- 
tion FX. 

Am bos problemas se deb en al hecho de que las 
llamadas *FX se pasan a travel del interprele de 
linea de instmeciones (CL1: command line interpre- 
ter) y no a traves del interprele basic, siendo el caso 
que CLI desconoce la manera de vaiorar las varia- 
bles basic y de tratar lineas con varias instruc- 
ciones, 

Como vimos, se pueden pasar parametros al OS- 
BYTE con los registros X e Y, y es posible tambien 
releer valores de algunas de las variables del siste- 
ma empleadas por el sistema operativo. Esto se 
hace con el empleo de la llamada USR o de una 
rutina en codigo maquina. como ya sabemos. 
Quiza usted encuentre el metodo del c6digo algo 
mas fatil de usar en el caso de que le interesen los 
resultados obtenidos del sistema operativo, ya que 
el valor obtenido con la llamada USR ha de ser de- 
codifjeado para conseguir varios bits de informa- 
tion de ella, 

Los parametros son devueltos al basic con los re- 
gistros XeY, y tambien en algunas llamadas el flag 
de arrastre se utiliza para indicar una condition de 
error. 



Obviamente los resultados que se devuelven de 
este modo dependeran de la llamada, es decir, de! 
valor pasado al OSBYTE con el registro A. No todas 
las llamadas OSBYTE devuelven resultados al basic. 
De todas formas, muchas de ellas nos faeilitan una 
util informaci6n sobre el sistema operativo. 

Information retornada 

Son dos los tipos de information que puede retor- 
nar una llamada OSBYTE. El primero es el de los 
datos leidos de alguna parte del sistema, tal como la 
puerta para el usuario, el proeesador de la voz, o 
las variables del sistema. Las llamadas OSBYTE que 
devuelven este tipo de information son conotidas 
como llamadas de solo leetura. Un ejemplo tipico 
de su empleo es la llamada OSBYTE con A= 1 29. 
Esta llamada se utiliza en basic para implementar 
la funcion INKEY (). 

Los registros XeY deben establecerse para 
pasar el retardo temporal adecuado al sistema ope- 
rativo.- El registro X retiene el byte inferior de 
dicho retardo (en centisegundos) y el registro Y el 
byte superior. Asi, para que esta llamada genere 
una espera de hasta un segundo hasta la pulsation 
de una tecla, el r ragmen to de codigo maquina que 
escribimos mas abajo es valido. Los registros XeY 
devuelven los valores; si el flag de arrastre esta a 
cero, y el registro Y contiene asimismo un valor de 
0, significa que la salida fue provocada por la pulsa- 
tion de una tecla. El valor ASCII de esa tecla se 
encontrara en el registro X, Si Y contiene 255 y C 
esta a 1 } es serial de que no se pulso tecla alguna en 
el periodo de tiempo especificado. Si C esta a uno e 
Y contiene 27, indica que se pulso la tecla Escape. 

El siguiente fragment© en lenguaje maquina ilus- 
tra la manera de realizar esta llamada OSBYTE. Si el 
flag de arrastre esta activado, a la vuelta de la ruti- 
na se hace una bifurcation a una rutina ulterior de 
tratamiento. 

Esta rutina puede comprobar el valor contenido 
en el registro Y para saber si se pulso una tecla o 
no, o bien se pulso Escape. 



1000 


LDA 


#129 


/establece OSBYTE 


1010 


LDX 


#100 


/parametros 


1020 


LDY 


#0 




1030 


JSR 


&FFF4 


/realiza la llamada OSBYTE 


1040 


BCS 


error 




1050 


RTS 






1060 


.error 




/codigo para tratar un 



error 

Otras llamadas OSBYTE, especialmente las que dan 
un valor a A entre 166 y 255, son llamadas de leetu- 
ra y escritura a la vez, permitiendonos leer o bien 
escribir ciertas variables del sistema en el sistema 
operativo. 

Puede que usted empiece a preguntarse como 
sabe una llamada OSBYTE si le piden una operation 
de leetura o de escritura. Muy sencillo. 

Para escribir un valor con una llamada OSBYTE, 
la llamada se realizara conteniendo el registro X el 
valor que deseamos que tal llamada escriba mien- 
tras el registro Y esta puesto a 0; 

Para leer un valor de una de estas variables del 
sistema, se pone X a 0 e Y contendra 225. Despues 
se hace la llamada. 

Si va a haber una devolution, su valor se pondra 
en los registros XeY. 
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Empleo de las llamadas 
OSBYTE 

Las llamadas OSBYTE son "cabos furrieles" del sis- 
tema operative que intervienen en un gran nume- 
ro de rutinas del sistema operativo. Los sistemas de 
ficheros, el teclado, Econet, las tedas Break y Es- 
cape, se ven afectados en mayor o menor medida 
por las llamadas OSBYTE. 

EI numero de estas llamadas disponibles nos im- 
pide ex amin arias una por una; aun asi trataremos 
aqui las mas utiles y menos estudiadas en el manual 
del usuario del BBC Micro. 

Teclas de funcion: La orden *FX1 8 no tiene parame- 
tros, pero es muy util. Borra de la memoria las defi- 
niciones en eurso de teclas de funcion, lo que resul- 
ta practico a la hora de definir varias veces en el 
programa una tecla de funcion. 

De A FX225 a *FX228: Si no se programo una tecla 
de funcion con una serie, se pueden utilizar estas 
llamadas para obligar a las teclas de funcion rojas a 
que nos den el valor ASCII. Por ejemplo, *FX225,n 
hara que la tecla de funci6n fO nos de el codigo 
ASCII de n al pulsarla, y la fl nos dara el de (n+1), 
etc. La *FX226 hace lo mismo cuando las teclas se 
pulsan juntamente con la techa Shift. La *FX227 
sirve cuando se pulsan las teclas junto con la tecla 
Control, y la *FX228 lo hace cuando se pulsan a la 
vez Shift y Control ademas de una de funcion. 

Funciones video y manejadores de VDU: Gran 
parte de la tarea de control de la visualization en el 
BBC Micro se realiza median te la escritura de valo- 
res para los manejadores de VDU. Aun asi, un par 
de llamadas OSBYTE vienen en nuestra ayuda en 
este contexto, 

*FX1 9: Aunque no tenga parametros, su utilidad 
se evidencia al programar graficos en mo vim i en to. 
Una vez ejecutada esta instruction, el ordenador 
espera hasta que la siguiente "vent an a" de visuali- 
zation se hay a escrito. Esto significa que el movi- 
m ten to de los graficos es menos "arbitrario". Ha de 
hacerse la llamada siempre que se necesite una 
pausa. Dado que la visualizacion se refresca 50 
veces por segundo, es posible su empleo para gene- 
rar retardos temporales o proporcionar interrupcio- 
nes a la CPU. 

*FX218: Es una llamada OSBYTE de lectura/escri- 
tura que nos inform a de la longitud de la "cola" 
VDU (unidad de representation visual). Ya hemos 
explicado como algunos codigos VDU, cuando se 
envian a t raves dc manejadores VDU, esperan que 
les sigan otros codigos. EI numero de bytes que aun 
esperan los manejadores de VDU en cualquier mo- 
menta es el numero de bytes de la cola VDU. De 
manera comprensiva, esta llamada se usa mcjor 
para volver a leer information, y e! resultado se re- 
tornara en el registro X. 

*FX20: Esta llamada nos permite redefinir los ca- 
racteres en ASCII en el intervalo del 32 al 255, en 
vez del intervalo habitual y limitado de los caracte- 
res definidos por el usuario. Asi podemos redefinir , 
en Modos del 0 al 6, los caracteres a los que se 
accede desde el teclado normal. Para redefinir los 
caracteres en c6digos ASCII dentro del intervalo 
del 32 al 128 debemos reservar memoria en nuestro 
espacio de trabajo del basic poniendo PAGE a un 



Sistemas ope rati vos/Lenguaje maquina I s 



valor mas alio que de costumbre. La redefinition 
de estos caracteres se hace con la llamada VDU 23. 
Los caracteres se redefinen en bloques de 32, y 
cada bloque exige 256 bytes de memoria. El unico 
parametro empleado se pasa al registro X. EI ma- 
nual del usuario proporciona mas detalles sobre 
esta tecnica. 

Sonido: *FX210,n es una llamada util para esos jue- 
gos generosos en ruidos "destruyeovnis". Permite 
diluir los efectos sonoros. El sonido se oye normal- 
mente con *FX210 > 0 pero cualquier otro valor en el 
parametro X matara este sonido. 

*FX21 1 hasta *FX214: Son llamadas que controlan 
el sonido generado por CTRL-G o VDU7. Son de lec- 
tura/escritura. *FX21 1 ,D controla el canal del chip 
de sonido en el que se genera el sonido 
VDU7.*FX12,n controla el volumen del sonido gene- 
rado o el envoltorio empleado para generar este. EI 
volumen se codifica de la misma manera que el pa- 
rametro de amplitud en la orden SOUND del basic 
(o sea, - 15 es muy potente, 0 no se oye y nun.c:.- 
positivos son numeros de envoltorio). El valor pa- 
sado en el registro X en la llamada FX es dado per 
(n-1)*8, donde Fl es el parametro. *FX213,f1 contro- 
la el tono (pitch) de la nota generada por el VDU7: 
*FX214,n controla la duration de la nota generada y 
tocada por VDU7. 



Tecla Escape: *FX229,n permite a la tecla Escape 
"desconectarse". *FX229,1 desactiva la tecla Esca- 
pe y *FX229 > 0 le devuelve su efecto habitual. 

*FX220,n permite al usuario establecer una teda 
para generar el evento de Escape, siendo n el codi- 
go ASCII de la tecla que se desea acrue por Esca- 
pe. Asi, *FX22G\65 produce el evento Escape cada 
vez que se pulsa la tecla A. 

Buffers: *FX21 ,n disuelve, o vacia, un buffer (o me- 
moria de paso). La operation eonsiste en descanar 
cualquier byte que se encuentre en el buffer* For 
ejemplo , el vaciado del buffer del teclado desecha 
todas las teclas pulsadas que hayan podido acumu- 
larse mientras se ejecutaba un programa. Si usted 
prueba una orden GET cuando se tengan varias "te- 
clas" sin procesar en el buffer del teclado. la orden 
GET tomara una tecla del buffer en vez de esperar a 
que se pulse una tecla. El vaciado de un buffer se- 
tt or o concluye la generation de sonido en ese derer- 
minado canal, aun habiendo otras instructions de 
sonido esperan do a que se pulsen teclas. El buffer 
con el que se operara de-pen de del parametro X 
(vease cuadro al margen en esta paginal 

*FX138,n,m: Inserta el valor m en el buffer nume- 
ro n. Los numeros de los buffers son los mismos 
que para *FX21. Asi, *FX1 38,0,65 introducira la 
letra A en el buffer de teclado. 

Todas estas llamadas OSBYTE se pueden realizar, 
como es obvio, pas and o los parametros que corres- 
pondan a los registros A, X e Y y haciendo la lla- 
mada a la subrutina conforme se explico anterior- 
mente. 

Concluimos asi el estudio de las principales fun- 
ciones que quedan a cargo de las llamadas OSBYTE. 
Habria otras mas por ser examinadas dctenidamen- 
te (y se pueden encontrar en el manual), pero las 
tecnicas son las mismas que las que acabamos de 
describir. 
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"The micro revolution 
revisited" (Retorno a la 
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Large, Frances Pinter, 1984 
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Los ordenadores transformaran la vida de las personas y de las 
naciones de la misma forma en que la hart cambiado la rueda y el 
libro. Los dos libros que comentamos reflexionan, desde opticas 
diferentes, acerca de esta evidencia cada vez mas clara 



"Women and computing" "Micro revolution revisited" 



"{Pot que no animar a las mujeres? El director 
masculino es terrible; ha estado burlandose de la 
industria durante los ultimos 20 anos," Las palabras 
se le atribuyen a un profesor de psicologia de la 
organizacion, pero tales ideas estan muy ligadas a] 
propio pensamiento de Rose Deakin, aunque ella 
es demasiado discreta para decirlo, Sin embargo, 
no pierde el tiempo deteniendose en los hombres ni 
en la guerra de sexos; su preocupacion es lograr 
que las mujeres vean la informatica como una fuen- 
te de empleo y a los ordenadores como equipos m- 
dustriales, 

Su enfoque es tranquilo y desapasionado, presu- 
miblemente fruto de su cairera como asistenta so- 
cial, asesora de ventas de ordenadores y eseritora, 
El libro se lee como un informe de viabilidad elabo- 
rado por un buen analista: la informatica es una 
oportunidad que evidentemente las mujeres no 

"Es posible introducirse en la 
informatica con pocas cualiflcaciones y 

poca experieneia, y sin capacidad ni 
inteligencia inauditas," 

estan aprovechando. Deakin considera la educa- 
tion, el empleo y la promotion como los remedios 
a largo plazo, y la ayuda propia y la empresa como 
los objetivos a corto plazo; en resurnidas cuentas, 
las mujeres han de actuar ahora para sacar prove- 
cho del nuevo mercado* 

Tarn bien hay, sin embargo, humor e ingenio, 
Deakin se complace en describir su sensacion de 
regocijo tras dar un conferencia a 200 funtionarios 
publicos de gran antigiiedad sobre administration 
de bases de datos, solo unos pocos meses despues 
de haber aprendido el significado del termino, y 
esta justificadamente orgullosa del libro al cual sir- 
vio de base la conferencia. 

Son de especial interes tres capitulos, en que se 
cpmbinan sus virfudes personal es y profesionales. 
Estos deseriben las diferentes rutas que tomaron 
ella y otras siete mujeres en el campo de la informa- 

"[Los investigadores senalan que],,* las 
chicas hacen las sugerencias adecuadas 
para resolver el problema en cuestion; 
estas son desoidas por los varones, que 
luego necesitan tres intentos para 
conseguirbe" 

tica, y demuestran de forma categorica su tesis: que 
las aptitudes de la mujcr para organizacion y comu- 
nicacion, y su capacidad para el pensamiento lucido 
y el trabajo arduo la convierten en un usuario ideal 
de ordenadores, 



Un prologo de Neil Kinnock, actual lider del Parti- 
do Laborista britanico, el sello Set Book de la 
Open University de la cubierta y un corresponsal 
del diario Guardian como autor, son las credencia- 
les de este libro* Estas implican que la obra posee 
un interes social, es optimista, muy profesional y 
esta bien documentada. El tema del fibre es el de- 
safio que representa para el establishment social el 
avance hacia la era de la informatica. 

"Al fin y al cabo, los ordenadores poseen 
una logica matematica rigida: las 
personas, aforfunadamente, no/' 

A partir de la confusa historia de los primeros 40 
anos de la informatica, Large se detiene en los 
cinco peligros mortales de la informatizaci6n irre- 
flexiva: delito, ineficacia, ignorancia, desempleo y 
totalitarismo. Bien podria haber anadido redun- 
danciar este libro es, como ounimo, la sexta revi- 
sion de The micro revolution, escrito en 1980. Aun- 
que comenzd proclamando con gran entusiasmo la 
nueva Revolution Industrial, ahora llama vigorosa- 
menfe la atencion sobre la posi bill dad de volver a 
repetir los errores de ta prime ra. Describe los arti- 
lugios y artefactos con entusiasmo y experiencia, 
desarrollando mtentras tanto su leitmotiv: la vulne- 
rabilidad de la sociedad industrial a los efectos de la 
informatica sobre la production, el empleo, la edu- 
cation y la comunicacion. 

Large se muestra detididamente entusiasta res- 
pecto a las posibilidades de la tecnologia, pero no 
suena con que nuestra sociedad sea capaz de afron- 

"Hemos dejado evolucionar nuestras 
maquinas en vez de volver a disenarlas." 

tar la descualificacton, la perdida de empleos y la 
automatization. Al comienzo del analisis del libro 
sobre trabajo, comunicaciones, robot ica y desarro- 
llos futuros, describe un dfa imaginario en la vida 
de Jane y Joe Babbage, alrededor de 2014 d.C 
Jane edita un period ico financiero intern acional 
desde una playa de Cornualles, mientras Joe, que 
es medico, realiza sus visit as rutin arias a traves de 
la red publica de videotexto por ordenador. Los 
magros ingresos que obtienen con trabajos tan inte- 
resantes se comparan con el elevado salario que 
percibe Nat, un criado para tare as divers as de 73 
anos de edad que aiin sabe hacer trabajos manua- 
les. Hacia el final del libro resulta dificil saber si 
Large anhela o teme este futuro que imagina, y en 
que cifras relativas cree el que seguiremos el co mo- 
do camino de Jane y Joe hacia el empobrecimiento 
de la clase media y el sendero de Nat hacia la era de 
la abundancia de la clase trabajadora, 



